diff options
Diffstat (limited to 'Types/TrustLevel.hs')
| -rw-r--r-- | Types/TrustLevel.hs | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/Types/TrustLevel.hs b/Types/TrustLevel.hs index 058ce4595..ddb8e45e4 100644 --- a/Types/TrustLevel.hs +++ b/Types/TrustLevel.hs @@ -17,14 +17,4 @@ import Types.UUID data TrustLevel = SemiTrusted | UnTrusted | Trusted deriving Eq -instance Show TrustLevel where - show SemiTrusted = "?" - show UnTrusted = "0" - show Trusted = "1" - -instance Read TrustLevel where - readsPrec _ "1" = [(Trusted, "")] - readsPrec _ "0" = [(UnTrusted, "")] - readsPrec _ _ = [(SemiTrusted, "")] - type TrustMap = M.Map UUID TrustLevel |