X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/ee3ab257a5a8f5d4d20ffcf5f3b8259b822037f2..5cf977e52788c523150fa19225b90914e6ddc909:/bin/mozilla/io.pl diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index cb8376486..d85e618f7 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -1869,7 +1869,7 @@ sub print_form { %queued = map { s|.*/|| } split / /, $form->{queued}; if ($filename = $queued{ $form->{formname} }) { - $form->{queued} =~ s/$form->{formname} $filename//; + $form->{queued} =~ s/\Q$form->{formname} $filename\E//; unlink "$spool/$filename"; $filename =~ s/\..*$//g; } else {