better warnings display
This commit is contained in:
parent
3cb5cb6bf6
commit
c30d38e108
3 changed files with 10 additions and 8 deletions
|
@ -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
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue