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

[sartak at bestpractical.com]

Author: sartak
Date: Tue Oct 28 17:32:21 2008
New Revision: 16585

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

Log:
 r74706 at onn:  sartak | 2008-10-28 17:32:16 -0400
 "help" dispatcher rules


Modified: sd/trunk/lib/App/SD/CLI/Dispatcher.pm
==============================================================================
--- sd/trunk/lib/App/SD/CLI/Dispatcher.pm	(original)
+++ sd/trunk/lib/App/SD/CLI/Dispatcher.pm	Tue Oct 28 17:32:21 2008
@@ -10,11 +10,25 @@
 rewrite [ ['about', 'copying'] ] => sub { "help $1" };
 
 under help => sub {
-    rewrite [ ['push', 'pull', 'publish', 'server'] ] => 'help sync';
-    rewrite 'env' => 'help environment';
-    rewrite 'ticket' => 'help tickets';
-    rewrite [ 'ticket', ['list', 'search', 'find'] ] => 'help search';
-    rewrite [ ['list', 'find'] ] => 'help search';
+    on about   => run_command('Help::About');
+    on config  => run_command('Help::Config');
+    on copying => run_command('Help::Copying');
+
+    on [ ['author', 'authors'] ]         => run_command('Help::Authors');
+    on [ ['environment', 'env'] ]        => run_command('Help::Environment');
+    on [ ['ticket', 'tickets'] ]         => run_command('Help::Tickets');
+    on [ ['attachment', 'attachments'] ] => run_command('Help::Attachments');
+    on [ ['comment', 'comments'] ]       => run_command('Help:::Comments');
+
+    on [
+        ['ticket', 'attachment', 'comment'],
+        ['list', 'search', 'find'],
+    ] => run_command('Help::Search');
+
+    on [ ['search', 'list', 'find'] ] => run_command('Help::Search');
+
+    on [ ['sync', 'push', 'pull', 'publish', 'server'] ]
+        => run_command('Help::Sync');
 };
 
 on help => run_command('Help');