Derive Typeable for User (upcoming Yesod 1.2 change)

yesodweb · Mar 11, 2013 · ee74d26 · ee74d26
1 parent 1e74505
commit ee74d26
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 1 deletion.
diff --git a/Model.hs b/Model.hs
@@ -4,7 +4,7 @@ import Prelude
 import Yesod
 import Data.Text (Text)
 import Database.Persist.Quasi
-
+import Data.Typeable (Typeable)
 
 -- You can define all of your database entities in the entities file.
 -- You can find more information on persistent and how to declare entities

diff --git a/PROJECTNAME.cabal b/PROJECTNAME.cabal
@@ -39,6 +39,7 @@ library
                 FlexibleContexts
                 EmptyDataDecls
                 NoMonomorphismRestriction
+                DeriveDataTypeable
 
     build-depends: base                          >= 4          && < 5
                  -- , yesod-platform                >= 1.1        && < 1.2

diff --git a/config/models b/config/models
@@ -2,6 +2,7 @@ User
     ident Text
     password Text Maybe
     UniqueUser ident
+    deriving Typeable
 Email
     email Text
     user UserId Maybe