X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c1716dbdeb0ba6d2cd9c708a2c54b9845e9532b4..2be3ec7cd2f7aeefb78b126cf8fd8b4e2e2fb767:/SL/SEPA/XML/Transaction.pm diff --git a/SL/SEPA/XML/Transaction.pm b/SL/SEPA/XML/Transaction.pm index 83a749e37..22f661bb6 100644 --- a/SL/SEPA/XML/Transaction.pm +++ b/SL/SEPA/XML/Transaction.pm @@ -2,6 +2,8 @@ package SL::SEPA::XML::Transaction; use strict; +use SL::DB::Helper::ReplaceSpecialChars qw(replace_special_chars); + use Carp; use Encode; use List::Util qw(first); @@ -35,7 +37,7 @@ sub _init { map { $self->{$_} = $self->{sepa}->{iconv}->convert($params{$_}) } keys %params; map { $self->{$_} =~ s/\s+//g } qw(src_iban src_bic dst_iban dst_bic); - map { $self->{$_} = $self->{sepa}->_replace_special_chars($self->{$_}) } qw(company reference end_to_end_id); + map { $self->{$_} = replace_special_chars($self->{$_}) } qw(company reference end_to_end_id); } sub get {