projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Inventory: warnings
[kivitendo-erp.git]
/
SL
/
Presenter
/
BankAccount.pm
diff --git
a/SL/Presenter/BankAccount.pm
b/SL/Presenter/BankAccount.pm
index
13a8cb2
..
925dd97
100644
(file)
--- a/
SL/Presenter/BankAccount.pm
+++ b/
SL/Presenter/BankAccount.pm
@@
-2,21
+2,21
@@
package SL::Presenter::BankAccount;
use strict;
use strict;
-use
parent qw(Exporter
);
+use
SL::Presenter::EscapedText qw(escape
);
use Exporter qw(import);
use Exporter qw(import);
-our @EXPORT = qw(account_number bank_code);
+our @EXPORT
_OK
= qw(account_number bank_code);
use Carp;
sub account_number {
use Carp;
sub account_number {
- my ($
self, $
bank_account) = @_;
-
return $self->escaped_text
($bank_account->account_number);
+ my ($bank_account) = @_;
+
escape
($bank_account->account_number);
}
sub bank_code {
}
sub bank_code {
- my ($
self, $
bank_account) = @_;
-
return $self->escaped_text
($bank_account->bank_code);
+ my ($bank_account) = @_;
+
escape
($bank_account->bank_code);
}
1;
}
1;