rnhmjoj/skeleton
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix colliding parameters

Browse Source
This commit is contained in:
rnhmjoj 2015-07-07 23:29:26 +02:00
parent c744144b36
commit 2c71c293a9
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/Main.hs
View File

@ -59,12 +59,12 @@ data ProgArgs = ProgArgs
parser :: ParserSpec ProgArgs
parser = ProgArgs
`parsedBy` reqPos "term" `Descr` "Keychain search term"
`andBy` optFlag "" "keychain" `Descr` "Use a specific keychain (default: all except System)"
`andBy` optFlag "" "exact" `Descr` "Return exact matches with the given class"
`andBy` optFlag 10 "limit" `Descr` "Set upper results limit (default: 10, 0: unlimited)"
`andBy` boolFlag "content" `Descr` "Print only the items content"
`andBy` boolFlag "clipboard" `Descr` "Disable paste to clipboard"
`parsedBy` reqPos "term" `Descr` "Keychain search term"
`andBy` optFlag "" "keychain" `Descr` "Use a specific keychain (default: all except System)"
`andBy` optFlag "" "exact" `Descr` "Return exact matches with the given class"
`andBy` optFlag 10 "limit" `Descr` "Set upper results limit (default: 10, 0: unlimited)"
`andBy` boolFlag "content" `Descr` "Print only the items content"
`andBy` boolFlag "noclipboard" `Descr` "Disable paste to clipboard"
interface :: IO (CmdLnInterface ProgArgs)
interface =