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