From c436b4ffeb3de5d741a66eb24a43dac128101d0f Mon Sep 17 00:00:00 2001
From: IKEDA Soji <ikeda@conversion.co.jp>
Date: Wed, 27 Nov 2019 18:53:09 +0900
Subject: [PATCH] Scenario: Fixing a bug injected by #782. File names for
 search filters may not be quoted.

---
 src/lib/Sympa/Scenario.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/lib/Sympa/Scenario.pm b/src/lib/Sympa/Scenario.pm
index b737de6a7..47b877f53 100644
--- a/src/lib/Sympa/Scenario.pm
+++ b/src/lib/Sympa/Scenario.pm
@@ -827,7 +827,11 @@ sub _compile_condition {
             $str =~ s{(\\.|.)}{($1 eq "'" or $1 eq "\\")? "\\\'" : $1}eg;
             $value = sprintf "'%s'", $str;
         } else {
-            # Parse error.
+            # Texts with unknown format may be treated as the string constants
+            # for compatibility to loose parsing with earlier ver (<=6.2.48).
+            my $str = $value;
+            $str =~ s/([\\\'])/\\$1/g;
+            $value = sprintf "'%s'", $str;
         }
         push(@args, $value);
     }