diff options
| author |  Chris Xiong <chirs241097@gmail.com>
| 2021-10-14 19:01:18 -0400 |
|---|---|---|
| committer | Chris Xiong <chirs241097@gmail.com>
| 2021-10-14 19:01:18 -0400 |
| commit | 846cdbdbf965fc50478bcc4c6436e3dc6a489f3f (patch) | |
| tree | 4a39385c982291a110f513871aba340f0a7a061e /x11-wm/fvwm3/files | |
| download | ppo-846cdbdbf965fc50478bcc4c6436e3dc6a489f3f.tar.xz | |
Initial commit.
Diffstat (limited to 'x11-wm/fvwm3/files')
| -rw-r--r-- | x11-wm/fvwm3/files/fvwm3_perl528.patch | 13 |
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; |