diff options
author | Edmund von der Burg <evdb@mysociety.org> | 2011-03-22 13:32:54 +0000 |
---|---|---|
committer | Edmund von der Burg <evdb@mysociety.org> | 2011-03-22 13:32:54 +0000 |
commit | 9aaf7e1b00f31157eaff3b4239449e6c94132478 (patch) | |
tree | 08c932e3a236db69a8c78d6e6fe5e9e1be63a9b5 | |
parent | 3cb31bca78023124e4526598e214b43b2e5b96a8 (diff) |
disable debug output
-rwxr-xr-x | setenv.pl | 12 |
1 files changed, 1 insertions, 11 deletions
@@ -10,18 +10,8 @@ my $root; BEGIN { # add the local perllibs too # Can't use Path::Class here as we'd load the old debian one. - $root = - __FILE__ =~ m{^(.*)/web/\.\..*$} - ? $1 - : `pwd`; + $root = __FILE__ =~ m{^(.*)/web/\.\..*$} ? $1 : `pwd`; chomp($root); - - # warn "-----------------------\n"; - # warn "__FILE__: " . __FILE__ . "\n"; - warn '$root: ' . $root . "\n"; - - # warn '$0: ' . $0 . "\n"; - # warn "-----------------------"; } # Set the environment for the FixMyStreet project |