aboutsummaryrefslogtreecommitdiff
path: root/Assistant/Pairing.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-09-13 00:29:25 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-09-13 00:29:25 -0400
commita3913f52e52777b18bd8e50ff593a4f4085e8b93 (patch)
tree6aaf6258269867ded2d0a669e85ae3b9cb490fae /Assistant/Pairing.hs
parentea55609e54095b1abcc53b6c750cfec8e6ced211 (diff)
change to newtype
Diffstat (limited to 'Assistant/Pairing.hs')
-rw-r--r--Assistant/Pairing.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Pairing.hs b/Assistant/Pairing.hs
index 5d097ab7d..662654255 100644
--- a/Assistant/Pairing.hs
+++ b/Assistant/Pairing.hs
@@ -75,7 +75,7 @@ data SomeAddr = IPv4Addr HostAddress | IPv6Addr HostAddress6
{- This contains the whole secret, just lightly obfuscated to make it not
- too obvious. It's only displayed in the user's web browser. -}
-data SecretReminder = SecretReminder [Int]
+newtype SecretReminder = SecretReminder [Int]
deriving (Show, Eq, Ord, Read)
toSecretReminder :: T.Text -> SecretReminder