X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FSEPA%2FXML.pm;h=e4bf360d676102af6a08826cd8518b9341a70b91;hb=37d14c11afd10049be58467770499b25268c1364;hp=8ccfa837452d2d9627cd72d458e54372c27185a7;hpb=9bf9acdff05a8047d0561c68cdd93b0a03deb568;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; }