Quoten von allen in regulären Ausdrücken verwendeten Variablen, die direkt oder indir...

[mfinanz.git] / bin / mozilla / io.pl

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index cb8376486ccbc85009c03c790f9bbadee3260c1c..d85e618f76f1a42d85158c2c4956f0927315ccd0 100644 (file)
--- 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 {