X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fio.pl;h=adb78ed49992699e6c68c2f871a13c43274898b7;hb=e6f429e42da71c71b6416727216302a87a254fde;hp=f935128082664954281ceb6d0feccc7d0a8eb651;hpb=2b89ec9756dc1d3525b6163fe4cf4f38af83f9d8;p=kivitendo-erp.git diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index f93512808..adb78ed49 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -1359,4 +1359,1014 @@ sub e_mail { $attachment_filename =~ s/ /_/g; my %umlaute = ( - " \ No newline at end of file + "ä" => "ae", "ö" => "oe", "ü" => "ue", + "Ä" => "Ae", "Ö" => "Oe", "Ü" => "Ue", + "ß" => "ss" + ); + map({ $attachment_filename =~ s/$_/$umlaute{$_}/g; } keys(%umlaute)); + } else { + $attachment_filename = ""; + } + + if ($form->{"email"}) { + $form->{"fokus"} = "Form.subject"; + } else { + $form->{"fokus"} = "Form.email"; + } + $form->header; + + print qq| +
+ + + + +