X-Git-Url: http://git.tremily.us/?a=blobdiff_plain;f=pm_filter;h=1e51f9dd347c79e738d4aa9b4ef33da86aeafbfa;hb=36e258203c45e1fbb4c10cdbc9b91ca368eca811;hp=6c745e1f8c007e5a2a0d38c46c367b27cfa1aeed;hpb=dbb5d111968be2f0c4f7fb012787c67b9bac57f7;p=ikiwiki.git

diff --git a/pm_filter b/pm_filter
index 6c745e1f8..1e51f9dd3 100755
--- a/pm_filter
+++ b/pm_filter
@@ -7,22 +7,27 @@ BEGIN {
 }
 
 if (/INSTALLDIR_AUTOREPLACE/) {
-	$_=qq{my \$installdir="$prefix";};
+	$_=qq{our \$installdir="$prefix";};
 }
 elsif (/VERSION_AUTOREPLACE/) {
 	$_=qq{our \$version="$ver";};
 }
 elsif (/^use lib/) {
-	if (grep { $_ eq $libdir } @INC) {
+	# The idea here is to figure out if the libdir the Makefile.PL
+	# 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} ||
+	     $ENV{PERL5LIB} ne $libdir)) {
 		$_="";
 	}
 	else {
 		$_="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};
 }
-if (/^\$ENV{PATH}="(.*)";/) {
+elsif (/^\$ENV{PATH}="(.*)";/) {
 	$_="\$ENV{PATH}=\"$1:$prefix/bin\";\n";
 }