better warnings display

This commit is contained in:
Joey Hess 2011-01-26 20:30:07 -04:00
parent 3cb5cb6bf6
commit c30d38e108
3 changed files with 10 additions and 8 deletions

View file

@ -70,7 +70,6 @@ usage header cmds options =
cmdparams c ++
pad (longest cmdparams + 2) (cmdparams c) ++
cmddesc c
indent l = " " ++ l
pad n s = replicate (n - length s) ' '
longest f = foldl max 0 $ map (length . f) cmds