Initial commit.

1 files changed, 13 insertions, 0 deletions

diff --git a/x11-wm/fvwm3/files/fvwm3_perl528.patch b/x11-wm/fvwm3/files/fvwm3_perl528.patch
new file mode 100644
index 0000000..ce318a9
--- /dev/null
+++ b/x11-wm/fvwm3/files/fvwm3_perl528.patch
@@ -0,0 +1,13 @@
+diff --git a/modules/FvwmPerl/FvwmPerl.in b/modules/FvwmPerl/FvwmPerl.in
+index a8ef5dbe..95d79e94 100644
+--- a/modules/FvwmPerl/FvwmPerl.in
++++ b/modules/FvwmPerl/FvwmPerl.in
+@@ -321,7 +321,7 @@ sub preprocess ($;$) {
+ 	}
+ 
+ 	# perl code substitution first
+-	$$text_ref =~ s/\Q$quote1\E { ( .*? ) } \Q$quote2\E/
++	$$text_ref =~ s/\Q$quote1\E \{ ( .*? ) \} \Q$quote2\E/
+ 		my $result = eval "
+ 			no strict;
+ 			package PreprocessNamespace;