diff -r 03ca6d811a17 -r 23dd30396607 SI/tools.pm --- a/SI/tools.pm Sat Jan 16 23:53:50 2010 +0100 +++ b/SI/tools.pm Sun Jan 17 12:13:47 2010 +0100 @@ -1,10 +1,11 @@ package SI::tools; +use if $ENV{DEBUG} ~~ /tools|all/ => "Smart::Comments"; + use strict; use warnings; use base "Exporter"; our @EXPORT = qw(&run &verbose); -use if $ENV{DEBUG} ~~ /tools|all/ => "Smart::Comments"; sub run(@) { system(@_);