Merge branch 'master' of ssh://git.ikiwiki.info/srv/git/ikiwiki.info

[git.ikiwiki.info.git] / pm_filter

diff --git a/pm_filter b/pm_filter
index 287adc376af82d8bc52897829ec353cd33584f82..98cb5bd9ef930f5bb55d4efd4b27ea015fa987ae 100755 (executable)
--- a/pm_filter
+++ b/pm_filter
@@ -20,6 +20,9 @@ elsif (/^use lib/) {
                $_="use lib '$libdir';\n";
        }
 }
-elsif ($. == 1 && ($ENV{NOTAINT} || ! exists $ENV{NOTAINT}) && m{^(#!/usr/bin/perl) -T$}) {
+elsif ($. == 1 && ($ENV{NOTAINT} || ! exists $ENV{NOTAINT}) && m{^(#!.*perl.*?) -T$}) {
        $_=qq{$1\n};
 }
+elsif (/^\$ENV{PATH}="(.*)";/) {
+       $_="\$ENV{PATH}=\"$1:$prefix/bin\";\n";
+}