Deal with different paths to perl when removing -T flag.

[ikiwiki.git] / pm_filter

diff --git a/pm_filter b/pm_filter
index f61e7810b686cc8a1995134b9f8ed75ded158044..6c745e1f8c007e5a2a0d38c46c367b27cfa1aeed 100755 (executable)
--- a/pm_filter
+++ b/pm_filter
@@ -20,3 +20,9 @@ elsif (/^use lib/) {
                $_="use lib '$libdir';\n";
        }
 }
                $_="use lib '$libdir';\n";
        }
 }

+elsif ($. == 1 && ($ENV{NOTAINT} || ! exists $ENV{NOTAINT}) && m{^(#!.*perl.*?) -T$}) {
+       $_=qq{$1\n};
+}
+if (/^\$ENV{PATH}="(.*)";/) {
+       $_="\$ENV{PATH}=\"$1:$prefix/bin\";\n";
+}