[Bps-public-commit] r13711 - in Shipwright/trunk: lib/Shipwright/Script
sunnavy at bestpractical.com
sunnavy at bestpractical.com
Tue Jul 1 10:55:43 EDT 2008
Author: sunnavy
Date: Tue Jul 1 10:55:40 2008
New Revision: 13711
Modified:
Shipwright/trunk/ (props changed)
Shipwright/trunk/lib/Shipwright/Script/Update.pm
Log:
r13940 at sunnavys-mb: sunnavy | 2008-06-28 10:41:50 +0800
tiny change
Modified: Shipwright/trunk/lib/Shipwright/Script/Update.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Update.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Script/Update.pm Tue Jul 1 10:55:40 2008
@@ -5,8 +5,7 @@
use Carp;
use base qw/App::CLI::Command Class::Accessor::Fast Shipwright::Script/;
-__PACKAGE__->mk_accessors(
- qw/all follow builder utility version/);
+__PACKAGE__->mk_accessors(qw/all follow builder utility version/);
use Shipwright;
use File::Spec;
@@ -37,12 +36,10 @@
$shipwright = Shipwright->new( repository => $self->repository, );
if ( $self->builder ) {
- $shipwright->backend->update(
- path => File::Spec->catfile( 'bin', 'shipwright-builder' ) );
+ $shipwright->backend->update( path => '/bin/shipwright-builder' );
}
elsif ( $self->utility ) {
- $shipwright->backend->update(
- path => File::Spec->catfile( 'bin', 'shipwright-utility' ) );
+ $shipwright->backend->update( path => '/bin/shipwright-utility' );
}
else {
@@ -77,7 +74,7 @@
}
};
- $find_deps->( $name );
+ $find_deps->($name);
@dists = keys %checked;
}
$self->_update($_) for @dists;
More information about the Bps-public-commit
mailing list