92ab8ee889
GHC 7 changes the syntax for quasi-quotation. A later patch release (7.0.2) should be adding back backwards-compatibility with the old syntax, but in the meanwhile this (relatively ugly) hack should fix it.
23 lines
604 B
Plaintext
23 lines
604 B
Plaintext
{-# LANGUAGE QuasiQuotes, TypeFamilies, GeneralizedNewtypeDeriving #-}
|
|
module Model where
|
|
|
|
import Yesod
|
|
import Database.Persist.TH (share2)
|
|
import Database.Persist.GenericSql (mkMigrate)
|
|
|
|
-- You can define all of your database entities here. You can find more
|
|
-- information on persistent and how to declare entities at:
|
|
-- http://docs.yesodweb.com/book/persistent/
|
|
share2 mkPersist (mkMigrate "migrateAll") [~qq~persist|
|
|
User
|
|
ident String
|
|
password String null update
|
|
UniqueUser ident
|
|
Email
|
|
email String
|
|
user UserId null update
|
|
verkey String null update
|
|
UniqueEmail email
|
|
|]
|
|
|