[Bps-public-commit] r13617 - in Shipwright/trunk: lib/Shipwright/Script
sunnavy at bestpractical.com
sunnavy at bestpractical.com
Thu Jun 26 15:59:00 EDT 2008
Author: sunnavy
Date: Thu Jun 26 15:58:57 2008
New Revision: 13617
Modified:
Shipwright/trunk/ (props changed)
Shipwright/trunk/lib/Shipwright/Script/Build.pm
Shipwright/trunk/lib/Shipwright/Script/Create.pm
Shipwright/trunk/lib/Shipwright/Script/Delete.pm
Shipwright/trunk/lib/Shipwright/Script/Flags.pm
Shipwright/trunk/lib/Shipwright/Script/Import.pm
Shipwright/trunk/lib/Shipwright/Script/Ktf.pm
Shipwright/trunk/lib/Shipwright/Script/List.pm
Shipwright/trunk/lib/Shipwright/Script/Maintain.pm
Shipwright/trunk/lib/Shipwright/Script/Rename.pm
Shipwright/trunk/lib/Shipwright/Script/Update.pm
Log:
r13842 at sunnavys-mb: sunnavy | 2008-06-27 03:58:00 +0800
cleaned up
Modified: Shipwright/trunk/lib/Shipwright/Script/Build.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Build.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Script/Build.pm Thu Jun 26 15:58:57 2008
@@ -15,9 +15,6 @@
sub options {
(
- 'r|repository=s' => 'repository',
- 'l|log-level=s' => 'log_level',
- 'log-file=s' => 'log_file',
'install-base=s' => 'install_base',
'build-base=s' => 'build_base',
'name=s' => 'name',
Modified: Shipwright/trunk/lib/Shipwright/Script/Create.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Create.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Script/Create.pm Thu Jun 26 15:58:57 2008
@@ -11,14 +11,6 @@
use File::Spec;
use Shipwright::Util;
-sub options {
- (
- 'r|repository=s' => 'repository',
- 'l|log-level=s' => 'log_level',
- 'log-file=s' => 'log_file',
- );
-}
-
sub run {
my $self = shift;
Modified: Shipwright/trunk/lib/Shipwright/Script/Delete.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Delete.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Script/Delete.pm Thu Jun 26 15:58:57 2008
@@ -13,9 +13,6 @@
sub options {
(
- 'r|repository=s' => 'repository',
- 'l|log-level=s' => 'log_level',
- 'log-file=s' => 'log_file',
'name=s' => 'name',
);
}
Modified: Shipwright/trunk/lib/Shipwright/Script/Flags.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Flags.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Script/Flags.pm Thu Jun 26 15:58:57 2008
@@ -13,9 +13,6 @@
sub options {
(
- 'r|repository=s' => 'repository',
- 'l|log-level=s' => 'log_level',
- 'log-file=s' => 'log_file',
'a|add=s' => 'add',
'd|delete=s' => 'delete',
's|set=s' => 'set',
Modified: Shipwright/trunk/lib/Shipwright/Script/Import.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Import.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Script/Import.pm Thu Jun 26 15:58:57 2008
@@ -24,9 +24,6 @@
sub options {
(
- 'r|repository=s' => 'repository',
- 'l|log-level=s' => 'log_level',
- 'log-file=s' => 'log_file',
'm|comment=s' => 'comment',
's|source=s' => 'source',
'name=s' => 'name',
Modified: Shipwright/trunk/lib/Shipwright/Script/Ktf.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Ktf.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Script/Ktf.pm Thu Jun 26 15:58:57 2008
@@ -12,9 +12,6 @@
sub options {
(
- 'r|repository=s' => 'repository',
- 'l|log-level=s' => 'log_level',
- 'log-file=s' => 'log_file',
'd|delete' => 'delete',
's|set=s' => 'set',
'name=s' => 'name',
Modified: Shipwright/trunk/lib/Shipwright/Script/List.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/List.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Script/List.pm Thu Jun 26 15:58:57 2008
@@ -12,9 +12,6 @@
sub options {
(
- 'r|repository=s' => 'repository',
- 'l|log-level=s' => 'log_level',
- 'log-file=s' => 'log_file',
'name=s' => 'name',
'with-latest-version' => 'with_latest_version',
'only-update' => 'only_update',
Modified: Shipwright/trunk/lib/Shipwright/Script/Maintain.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Maintain.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Script/Maintain.pm Thu Jun 26 15:58:57 2008
@@ -14,9 +14,6 @@
sub options {
(
- 'r|repository=s' => 'repository',
- 'l|log-level=s' => 'log_level',
- 'log-file=s' => 'log_file',
'update-order' => 'update_order',
'keep-recommends=s' => 'keep_recommends',
'keep-requires=s' => 'keep_requires',
Modified: Shipwright/trunk/lib/Shipwright/Script/Rename.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Rename.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Script/Rename.pm Thu Jun 26 15:58:57 2008
@@ -13,9 +13,6 @@
sub options {
(
- 'r|repository=s' => 'repository',
- 'l|log-level=s' => 'log_level',
- 'log-file=s' => 'log_file',
'name=s' => 'name',
'new-name=s' => 'new_name',
);
Modified: Shipwright/trunk/lib/Shipwright/Script/Update.pm
==============================================================================
--- Shipwright/trunk/lib/Shipwright/Script/Update.pm (original)
+++ Shipwright/trunk/lib/Shipwright/Script/Update.pm Thu Jun 26 15:58:57 2008
@@ -20,15 +20,12 @@
sub options {
(
- 'r|repository=s' => 'repository',
- 'l|log-level=s' => 'log_level',
- 'log-file=s' => 'log_file',
- 'name=s' => 'name',
- 'a|all' => 'all',
- 'follow' => 'follow',
- 'builder' => 'builder',
- 'utility' => 'utility',
- 'version=s' => 'version',
+ 'name=s' => 'name',
+ 'a|all' => 'all',
+ 'follow' => 'follow',
+ 'builder' => 'builder',
+ 'utility' => 'utility',
+ 'version=s' => 'version',
);
}
@@ -107,9 +104,9 @@
if ( $source->{$name} ) {
$shipwright->source(
Shipwright::Source->new(
- name => $name,
- source => $source->{$name},
- follow => 0,
+ name => $name,
+ source => $source->{$name},
+ follow => 0,
version => $version,
)
);
@@ -132,8 +129,8 @@
$shipwright->source(
Shipwright::Source->new(
- source => "cpan:$s",
- follow => 0,
+ source => "cpan:$s",
+ follow => 0,
version => $version,
)
);
@@ -141,8 +138,7 @@
$shipwright->source->run;
- $version =
- Shipwright::Util::LoadFile( $shipwright->source->version_path );
+ $version = Shipwright::Util::LoadFile( $shipwright->source->version_path );
$shipwright->backend->import(
source => File::Spec->catfile( $shipwright->source->directory, $name ),
More information about the Bps-public-commit
mailing list