fix duplicate expansion of comments

[git.ikiwiki.info.git] / pm_filter

diff --git a/pm_filter b/pm_filter
index 4984f32d906eae416001dad7f29baab986c0d8c2..8e1480564af9400e050c32ed634d6cc1beb64a97 100755 (executable)
--- a/pm_filter
+++ b/pm_filter
@@ -25,9 +25,9 @@ elsif (/^use lib/) {
                $_="use lib '$libdir';\n";
        }
 }
-elsif ($. == 1 && ($ENV{NOTAINT} || ! exists $ENV{NOTAINT}) && m{^(#!.*perl.*?) -T$}) {
-       $_=qq{$1\n};
+elsif ($. == 1 && ($ENV{NOTAINT}=0) && m{^(#!.*perl.*?)$}) {
+       $_=qq{$1 -T\n};
 }
-elsif (/^\$ENV{PATH}="(.*)";/) {
+elsif (/^\$ENV\{PATH}="(.*)";/) {
        $_="\$ENV{PATH}=\"$1:$prefix/bin\";\n";
 }