Fix colliding parameters
This commit is contained in:
parent
c744144b36
commit
2c71c293a9
12
src/Main.hs
12
src/Main.hs
@ -59,12 +59,12 @@ data ProgArgs = ProgArgs
|
|||||||
|
|
||||||
parser :: ParserSpec ProgArgs
|
parser :: ParserSpec ProgArgs
|
||||||
parser = ProgArgs
|
parser = ProgArgs
|
||||||
`parsedBy` reqPos "term" `Descr` "Keychain search term"
|
`parsedBy` reqPos "term" `Descr` "Keychain search term"
|
||||||
`andBy` optFlag "" "keychain" `Descr` "Use a specific keychain (default: all except System)"
|
`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 "" "exact" `Descr` "Return exact matches with the given class"
|
||||||
`andBy` optFlag 10 "limit" `Descr` "Set upper results limit (default: 10, 0: unlimited)"
|
`andBy` optFlag 10 "limit" `Descr` "Set upper results limit (default: 10, 0: unlimited)"
|
||||||
`andBy` boolFlag "content" `Descr` "Print only the items content"
|
`andBy` boolFlag "content" `Descr` "Print only the items content"
|
||||||
`andBy` boolFlag "clipboard" `Descr` "Disable paste to clipboard"
|
`andBy` boolFlag "noclipboard" `Descr` "Disable paste to clipboard"
|
||||||
|
|
||||||
interface :: IO (CmdLnInterface ProgArgs)
|
interface :: IO (CmdLnInterface ProgArgs)
|
||||||
interface =
|
interface =
|
||||||
|
Loading…
Reference in New Issue
Block a user