From 2a802c1518d2ef9b4340961c173b5b2d111c499a Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 24 Feb 2008 16:01:10 -0500 Subject: if NOTAINT is not set, disable tainting --- pm_filter | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'pm_filter') 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}; } -- cgit v1.2.3