[Bps-public-commit] r11078 - Shipwright/trunk/lib/Shipwright

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Mon Mar 17 10:33:11 2008
New Revision: 11078

Modified:
   Shipwright/trunk/lib/Shipwright/Util.pm

Log:
mv $log into run sub

Modified: Shipwright/trunk/lib/Shipwright/Util.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Util.pm	(original)
+++ Shipwright/trunk/lib/Shipwright/Util.pm	Mon Mar 17 10:33:11 2008
@@ -5,8 +5,6 @@
 use Carp;
 use IPC::Run3;
 
-my $log = Log::Log4perl->get_logger('Shipwright::Util');
-
 BEGIN {
     local $@;
     eval { require YAML::Syck; };
@@ -48,6 +46,8 @@
     my $cmd   = shift;
     my $ignore_failure = shift;
 
+    my $log = Log::Log4perl->get_logger('Shipwright::Util');
+
     my ( $out, $err );
     $log->info( "run cmd:\n" . join ' ', @$cmd );
     run3( $cmd, \*STDIN, \$out, \$err );