X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FSEPA%2FXML.pm;h=e4bf360d676102af6a08826cd8518b9341a70b91;hb=d512cb5d87333ebce57e015343de3a0799762e91;hp=8ccfa837452d2d9627cd72d458e54372c27185a7;hpb=b021f0f5808d9a3b02ddc7f13c206ebc88387ff1;p=kivitendo-erp.git diff --git a/SL/SEPA/XML.pm b/SL/SEPA/XML.pm index 8ccfa8374..e4bf360d6 100644 --- a/SL/SEPA/XML.pm +++ b/SL/SEPA/XML.pm @@ -67,10 +67,15 @@ sub _replace_special_chars { 'Ü' => 'Ue', 'ß' => 'ss', '&' => '+', + '`' => '\'', ); map { $text =~ s/$_/$special_chars{$_}/g; } keys %special_chars; + # for all other non ascii chars 'OLÉ S.L.' and 'Årdberg AB'! + use Text::Unidecode qw(unidecode); + $text = unidecode($text); + return $text; }