From: Joey Hess <joey@kodama.kitenet.net>
Date: Sun, 24 Feb 2008 21:01:10 +0000 (-0500)
Subject: if NOTAINT is not set, disable tainting
X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/commitdiff_plain/2a802c1518d2ef9b4340961c173b5b2d111c499a

if NOTAINT is not set, disable tainting
---

diff --git a/pm_filter b/pm_filter
index a80ce04f0..287adc376 100755
--- a/pm_filter
+++ b/pm_filter
@@ -20,6 +20,6 @@ elsif (/^use lib/) {
 		$_="use lib '$libdir';\n";
 	}
 }
-elsif ($. == 1 && $ENV{NOTAINT} && m{^(#!/usr/bin/perl) -T$}) {
+elsif ($. == 1 && ($ENV{NOTAINT} || ! exists $ENV{NOTAINT}) && m{^(#!/usr/bin/perl) -T$}) {
 	$_=qq{$1\n};
 }