(no commit message)

[git.ikiwiki.info.git] / pm_filter

diff --git a/pm_filter b/pm_filter
index 71f26fae8cfad62002bd304700460a02ac27c6df..374e9a44fca9ca43233e22e306831dbbc2e6e02c 100755 (executable)
--- a/pm_filter
+++ b/pm_filter
@@ -12,9 +12,9 @@ if (/INSTALLDIR_AUTOREPLACE/) {
 elsif (/VERSION_AUTOREPLACE/) {
        $_=qq{our \$version="$ver";};
 }
 elsif (/VERSION_AUTOREPLACE/) {
        $_=qq{our \$version="$ver";};
 }

-elsif (/^use lib/) {
+elsif (/^(?:use FindBin; *)?use lib/) {

        # The idea here is to figure out if the libdir the Makefile.PL
        # The idea here is to figure out if the libdir the Makefile.PL

-       # was configure to use is in perl's normal search path.
+       # was configured to use is in perl's normal search path.

        # If not, hard code it into ikiwiki.
        if ((grep { $_ eq $libdir } @INC) &&
             (! exists $ENV{PERL5LIB} || ! length $ENV{PERL5LIB} ||
        # If not, hard code it into ikiwiki.
        if ((grep { $_ eq $libdir } @INC) &&
             (! exists $ENV{PERL5LIB} || ! length $ENV{PERL5LIB} ||


@@ -25,9 +25,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};
+elsif ($. == 1 && ($ENV{NOTAINT}=0) && m{^(#!.*perl.*?)$}) {
+       $_=qq{$1 -T\n};

 }
 }

-elsif (/^\$ENV{PATH}="(.*)";/) {
+elsif (/^\$ENV\{PATH}="(.*)";/) {

        $_="\$ENV{PATH}=\"$1:$prefix/bin\";\n";
 }
        $_="\$ENV{PATH}=\"$1:$prefix/bin\";\n";
 }