installer: made $DEBUG in fix-perl-path.pl contigent on DEBUG env var
authorGalen Charlton <galen.charlton@liblime.com>
Tue, 18 Dec 2007 20:54:51 +0000 (14:54 -0600)
committerGalen Charlton <galen.charlton@liblime.com>
Tue, 18 Dec 2007 20:54:51 +0000 (14:54 -0600)
fix-perl-path.PL

index 7e23b0b..aa37161 100644 (file)
@@ -20,7 +20,7 @@ use ExtUtils::MakeMaker::Config;
 use Tie::File;
 
 my $basedir = (shift);
-my $DEBUG = 1;
+my $DEBUG = exists $ENV{'DEBUG'} ? $ENV{'DEBUG'} : 0;
 
 $DEBUG = 1 if $basedir eq 'test';