diff options
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 |