diff options
Diffstat (limited to 'Types')
-rw-r--r-- | Types/Remote.hs | 2 | ||||
-rw-r--r-- | Types/TrustLevel.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/Types/Remote.hs b/Types/Remote.hs index 81f1dbe23..46750ee8d 100644 --- a/Types/Remote.hs +++ b/Types/Remote.hs @@ -159,7 +159,7 @@ unVerified a = do -- The FilePath will be relative, and may contain unix-style path -- separators. newtype ExportLocation = ExportLocation FilePath - deriving (Eq) + deriving (Show, Eq) data ExportActions a = ExportActions { exportSupported :: a Bool diff --git a/Types/TrustLevel.hs b/Types/TrustLevel.hs index 1cc4c662e..6ec18e512 100644 --- a/Types/TrustLevel.hs +++ b/Types/TrustLevel.hs @@ -21,7 +21,7 @@ import Types.UUID -- This order may seem backwards, but we generally want to list dead -- remotes last and trusted ones first. data TrustLevel = Trusted | SemiTrusted | UnTrusted | DeadTrusted - deriving (Eq, Enum, Ord, Bounded) + deriving (Eq, Enum, Ord, Bounded, Show) instance Default TrustLevel where def = SemiTrusted |