display cmdparamdesc in optparse-applicative usage messages

Since optparse-applicative display "FOO" as "[FOO]", the paramOptional
modifier which wrapped it in square brackets was removed from most places.
This commit is contained in:
Joey Hess 2015-07-08 13:39:11 -04:00
parent a2ba701056
commit 3125da54f6
7 changed files with 15 additions and 11 deletions

View file

@ -18,7 +18,7 @@ import Command.View (checkoutViewBranch)
cmd :: Command
cmd = notBareRepo $ notDirect $
command "vpop" (paramOptional paramNumber) seek SectionMetaData
command "vpop" paramNumber seek SectionMetaData
"switch back to previous view"
seek :: CommandSeek