diff --git a/openid.cabal b/openid.cabal
index 7a7b62b..221c230 100644
--- a/openid.cabal
+++ b/openid.cabal
@@ -1,5 +1,5 @@
 name:               openid
-version:            0.1.3.0
+version:            0.1.4.0
 cabal-version:      >= 1.6
 synopsis:           An implementation of the OpenID-2.0 spec.
 description:        An implementation of the OpenID-2.0 spec.
diff --git a/src/Network/OpenID/Association/Map.hs b/src/Network/OpenID/Association/Map.hs
index b56bf7b..052cbe2 100644
--- a/src/Network/OpenID/Association/Map.hs
+++ b/src/Network/OpenID/Association/Map.hs
@@ -27,7 +27,7 @@ import qualified Data.Map as Map
 
 -- | A simple association manager based on Data.Map
 newtype AssociationMap = AM (Map.Map String (UTCTime,Association))
-  deriving Show
+    deriving (Show,Read)
 
 instance AssociationManager AssociationMap where
   findAssociation (AM m) p = snd `fmap` Map.lookup (showProvider p) m
diff --git a/src/Network/OpenID/Types.hs b/src/Network/OpenID/Types.hs
index 7b539dc..a6012ec 100644
--- a/src/Network/OpenID/Types.hs
+++ b/src/Network/OpenID/Types.hs
@@ -74,7 +74,7 @@ data Association = Association
   , assocHandle    :: String
   , assocMacKey    :: [Word8]
   , assocType      :: AssocType
-  } deriving Show
+  } deriving (Show,Read)
 
 
 -- | Parameter lists for communication with the server