[Bps-public-commit] r17055 - in Prophet/trunk: .

spang at bestpractical.com spang at bestpractical.com
Sat Nov 29 18:35:50 EST 2008


Author: spang
Date: Sat Nov 29 18:35:49 2008
New Revision: 17055

Modified:
   Prophet/trunk/   (props changed)
   Prophet/trunk/lib/Prophet/CLI/Dispatcher.pm

Log:
 r52818 at loki:  spang | 2008-11-29 18:30:39 -0500
 dispatcher rule to make:
     sd publish foo at bar.com:www/baz (for example)
 run with foo at bar.com:www/baz as the --to arg


Modified: Prophet/trunk/lib/Prophet/CLI/Dispatcher.pm
==============================================================================
--- Prophet/trunk/lib/Prophet/CLI/Dispatcher.pm	(original)
+++ Prophet/trunk/lib/Prophet/CLI/Dispatcher.pm	Sat Nov 29 18:35:49 2008
@@ -30,6 +30,13 @@
     else { next_rule }
 };
 
+# publish foo at bar.com:www/baz => publish --to foo at bar.com:www/baz
+on qr{^publish (\S+)$} => sub {
+    my $self = shift;
+    $self->context->set_arg(to => $1) if $1;
+    run('publish', $self);
+};
+
 on [ ['create', 'new'] ]         => run_command("Create");
 on [ ['show', 'display'] ]       => run_command("Show");
 on [ ['update', 'edit'] ]        => run_command("Update");
@@ -49,8 +56,6 @@
 on shell    => run_command("Shell");
 on aliases  => run_command("Aliases");
 
-
-
 on export => sub {
     my $self = shift;
     $self->cli->handle->export_to(path => $self->context->arg('path'));



More information about the Bps-public-commit mailing list