From eccb70a7f91b2d22582587f26d1a28bb31408b45 Mon Sep 17 00:00:00 2001 From: V3n3RiX Date: Sat, 18 May 2019 00:10:51 +0100 Subject: gentoo resync : 18.05.2019 --- x11-wm/fvwm/files/fvwm-2.6.8-perl528.patch | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 x11-wm/fvwm/files/fvwm-2.6.8-perl528.patch (limited to 'x11-wm/fvwm/files/fvwm-2.6.8-perl528.patch') diff --git a/x11-wm/fvwm/files/fvwm-2.6.8-perl528.patch b/x11-wm/fvwm/files/fvwm-2.6.8-perl528.patch new file mode 100644 index 000000000000..5735fb1f89b7 --- /dev/null +++ b/x11-wm/fvwm/files/fvwm-2.6.8-perl528.patch @@ -0,0 +1,15 @@ +--- modules/FvwmPerl/FvwmPerl.in 2018-04-28 07:46:28.000000000 -0400 ++++ modules/FvwmPerl/FvwmPerl.in 2019-01-06 20:44:59.035950968 -0500 +@@ -319,11 +319,11 @@ + $FVWM_DATADIR = $FVWM_DATADIR || $module->site_data_dir; + $FVWM_USERDIR = $FVWM_USERDIR || $module->user_data_dir; + } + + # 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; + $1 + "; -- cgit v1.2.3