summaryrefslogtreecommitdiffhomepage
path: root/Types.hs
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2016-09-22 15:03:28 -0400
committerJoey Hess <joeyh@joeyh.name>2016-09-22 15:03:28 -0400
commit5487ed305120ee9c511878b90e9770ac30e20324 (patch)
tree0d9d937c2dfac7ba3ffaa1660e8c0c064ca5ef27 /Types.hs
parent42b995ed82e26bc18d2a2874ceb65781bceab421 (diff)
downloadkeysafe-5487ed305120ee9c511878b90e9770ac30e20324.tar.gz
In --autostart mode, check for gpg keys that have not been backed up, and offer to back them up.
Only ask once per key. This commit was sponsored by Thomas Hochstein on Patreon.
Diffstat (limited to 'Types.hs')
-rw-r--r--Types.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Types.hs b/Types.hs
index c065da3..937b58c 100644
--- a/Types.hs
+++ b/Types.hs
@@ -55,7 +55,7 @@ newtype Name = Name B.ByteString
-- | Source of the secret key stored in keysafe.
data SecretKeySource = GpgKey KeyId | KeyFile FilePath
- deriving (Show, Generic)
+ deriving (Show, Eq, Generic)
instance ToJSON SecretKeySource
instance FromJSON SecretKeySource
@@ -65,7 +65,7 @@ instance FromJSON SecretKeySource
--
-- A gpg keyid is the obvious example.
data KeyId = KeyId T.Text
- deriving (Show, Generic)
+ deriving (Show, Eq, Generic)
instance ToJSON KeyId
instance FromJSON KeyId