[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