diff options
author | Joey Hess <joeyh@joeyh.name> | 2017-12-05 13:58:53 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2017-12-05 13:58:53 -0400 |
commit | e6a9043dfe2ca5b82081f056cdfff4ed5fdfec93 (patch) | |
tree | f79fb62580f04bce35788e32985e3e5795926cf0 /Utility | |
parent | b928dc64041b7e3e19f7f8787cc1e38fb5b465ed (diff) |
fix gpg subkey support typo
initremote, enableremote: Really support gpg subkeys suffixed with an
exclamation mark, which forces gpg to use a specific subkey. (Previous try
had a bug.)
This commit was sponsored by Jake Vosloo on Patreon.
Diffstat (limited to 'Utility')
-rw-r--r-- | Utility/Gpg.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/Gpg.hs b/Utility/Gpg.hs index 94d588cd7..2ffb0add6 100644 --- a/Utility/Gpg.hs +++ b/Utility/Gpg.hs @@ -171,7 +171,7 @@ findPubKeys cmd for {- "subkey!" tells gpg to force use of a specific subkey -} isForcedSubKey :: String -> Bool -isForcedSubKey s = "!" `isSuffixOf` s && all isHexDigit (drop 1 s) +isForcedSubKey s = "!" `isSuffixOf` s && all isHexDigit (drop 1 (reverse s)) type UserId = String |