[Bps-public-commit] r14577 - in sd/trunk: .

sartak at bestpractical.com sartak at bestpractical.com
Mon Jul 28 12:55:03 EDT 2008


Author: sartak
Date: Mon Jul 28 12:55:03 2008
New Revision: 14577

Modified:
   sd/trunk/   (props changed)
   sd/trunk/lib/App/SD/CLI/Command/Push.pm

Log:
 r65317 at onn:  sartak | 2008-07-28 12:54:12 -0400
 Have push just subclass Prophet's push command


Modified: sd/trunk/lib/App/SD/CLI/Command/Push.pm
==============================================================================
--- sd/trunk/lib/App/SD/CLI/Command/Push.pm	(original)
+++ sd/trunk/lib/App/SD/CLI/Command/Push.pm	Mon Jul 28 12:55:03 2008
@@ -1,19 +1,6 @@
 package App::SD::CLI::Command::Push;
 use Moose;
-extends qw/App::SD::CLI::Command::Merge/;
-
-override run => sub {
-    my $self = shift;
-
-    die "Please specify a --to.\n" if !$self->has_arg('to');
-
-    local $ENV{PROPHET_RESOLVER} = 'Prompt';
-
-    $self->set_arg(from => $self->app_handle->default_replica_type.":file://".$self->app_handle->handle->fs_root);
-    $self->set_arg(db_uuid => $self->app_handle->handle->db_uuid);
-
-    super();
-};
+extends qw/Prophet::CLI::Command::Push/;
 
 __PACKAGE__->meta->make_immutable;
 no Moose;



More information about the Bps-public-commit mailing list