[Bps-public-commit] r14550 - sd/trunk/lib/App/SD/CLI/Command

simonw at bestpractical.com simonw at bestpractical.com
Sun Jul 27 17:26:56 EDT 2008


Author: simonw
Date: Sun Jul 27 17:26:55 2008
New Revision: 14550

Modified:
   sd/trunk/lib/App/SD/CLI/Command/Pull.pm

Log:
Remove unnecessary code (also allows 'pull --all' to work)


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



More information about the Bps-public-commit mailing list