[Bps-public-commit] r15486 - in sd/branches/dispatcher: lib/App/SD/CLI

[sartak at bestpractical.com]

Author: sartak
Date: Tue Aug 26 11:03:34 2008
New Revision: 15486

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

Log:
 r70376 at onn:  sartak | 2008-08-26 11:03:24 -0400
 Need to canonicalize (ticket, create) to (Ticket, Create)


Modified: sd/branches/dispatcher/lib/App/SD/CLI/Dispatcher.pm
==============================================================================
--- sd/branches/dispatcher/lib/App/SD/CLI/Dispatcher.pm	(original)
+++ sd/branches/dispatcher/lib/App/SD/CLI/Dispatcher.pm	Tue Aug 26 11:03:34 2008
@@ -19,7 +19,7 @@
     my @possible_classes;
     while (@pieces) {
         push @possible_classes, "App::SD::CLI::Command::"
-                              . join '::', @pieces;
+                              . join '::', map { ucfirst lc $_ } @pieces;
         shift @pieces;
     }