sort commands by name

mojolicious · Jan 12, 2014 · a2b954b · a2b954b
1 parent 34cff29
commit a2b954b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Mojolicious/Commands.pm b/lib/Mojolicious/Commands.pm
@@ -95,7 +95,7 @@ sub run {
   # Print list of all available commands
   my $max = max map { length $_->[0] } @commands;
   print $self->message;
-  for my $command (@commands) {
+  for my $command (sort { $a->[0] cmp $b->[0] } @commands) {
     my $name        = $command->[0];
     my $description = $command->[1]->new->description;
     print "  $name", (' ' x ($max - length $name)), "   $description";