AAFahrten and SEPA

This commit is contained in:
ragu 2022-08-08 13:59:42 +02:00
parent 1e81d08904
commit 00919c51eb
3 changed files with 10 additions and 9 deletions

View file

@ -121,8 +121,8 @@ sub tpl(){
#print $q->hidden(-name=>"$key",-override=>1,-value=>"3");
}else{
if($ctadr->{txt28} =~ /SEPA-Lastschriftmandat/){
#2022-08-08 disabled because of decoding, anyway, pdf should be enough
if(1==2 && $ctadr->{txt28} =~ /SEPA-Lastschriftmandat/){
print $q->div({-class=>'content2'}, ""),"\n";
$ctadr->{txt28} = $q->unescapeHTML("$ctadr->{txt28}");
use URI::Encode qw(uri_encode uri_decode);