Quell new warning in Perl 5.28

Unescaped left brace in regex is deprecated here (and will be fatal in Perl 5.32)
interchange · Sep 18, 2018 · d5455ab · d5455ab
1 parent 38dbcd1
commit d5455ab
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Vend/Config.pm b/lib/Vend/Config.pm
@@ -3870,7 +3870,7 @@ sub parse_wildcard {
 	$value =~ s/\*/.*/g;
 	$value =~ s/\?/./g;
 	$value =~
-		s[({(?:.+?,)+.+?})]
+		s[(\{(?:.+?,)+.+?\})]
 		 [ local $_ = $1; tr/{,}/(|)/; $_ ]eg;
 	$value =~ s/\s+/|/g;
 	eval {