diff options
-rw-r--r-- | keys.hs | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -401,6 +401,8 @@ unmaybe def = fmap (maybe def id) | |||
401 | 401 | ||
402 | opt_secret_keyring = expandPath <$> unmaybe "" opt_homedir <*> prim | 402 | opt_secret_keyring = expandPath <$> unmaybe "" opt_homedir <*> prim |
403 | where | 403 | where |
404 | -- TODO: alow multiple instances of --secret-keyring | ||
405 | -- See: System.Console.CmdTheLine.Arg.vFlagAll | ||
404 | prim = unmaybe "secring.gpg" . optDescrToTerm $ Option | 406 | prim = unmaybe "secring.gpg" . optDescrToTerm $ Option |
405 | "" ["secret-keyring"] | 407 | "" ["secret-keyring"] |
406 | (ReqArg id "file") | 408 | (ReqArg id "file") |