order commands in usage by name

1 files changed, 2 insertions, 1 deletions

diff --git a/Usage.hs b/Usage.hs
index a33f6f311..a1b47252d 100644
--- a/Usage.hs
+++ b/Usage.hs
@@ -7,6 +7,7 @@
 
 module Usage where
 
+import Common.Annex
 import System.Console.GetOpt
 
 import Types.Command
@@ -30,7 +31,7 @@ usage header cmds commonoptions = unlines $
 		alloptlines = filter (not . null) $
 			lines $ usageInfo "" $
 				concatMap cmdoptions cmds ++ commonoptions
-		(cmdlines, optlines) = go cmds alloptlines []
+		(cmdlines, optlines) = go (sort cmds) alloptlines []
 		go [] os ls = (ls, os)
 		go (c:cs) os ls = go cs os' (ls++(l:o))
 			where