[Bps-public-commit] r13361 - in Shipwright/trunk: .

sunnavy at bestpractical.com sunnavy at bestpractical.com
Tue Jun 17 15:31:04 EDT 2008


Author: sunnavy
Date: Tue Jun 17 15:31:03 2008
New Revision: 13361

Modified:
   Shipwright/trunk/   (props changed)
   Shipwright/trunk/lib/Shipwright/Script.pm

Log:
 r13490 at sunnavys-mb:  sunnavy | 2008-06-18 01:58:25 +0800
 tiny change


Modified: Shipwright/trunk/lib/Shipwright/Script.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script.pm	(original)
+++ Shipwright/trunk/lib/Shipwright/Script.pm	Tue Jun 17 15:31:03 2008
@@ -59,7 +59,7 @@
 
         }
 
-        if ($args{repository}) {
+        if ( $args{repository} ) {
 
             my $backend =
               Shipwright::Backend->new( repository => $args{repository} );
@@ -87,7 +87,10 @@
 
 sub log {
     my $self = shift;
-    Shipwright::Logger->new($self);
+    require Shipwright::Logger;
+
+    # only pass ref, or Logger will get confused
+    Shipwright::Logger->new( ref $self ? $self : () );
     return Log::Log4perl->get_logger( ref $self );
 }
 



More information about the Bps-public-commit mailing list