22 lines
405 B
Text
22 lines
405 B
Text
User
|
|
name Text
|
|
email Text
|
|
password Text
|
|
deriving Typeable
|
|
-- Email
|
|
-- email Text
|
|
-- user UserId Maybe
|
|
-- verkey Text Maybe
|
|
-- UniqueEmail email
|
|
Token
|
|
token Text
|
|
user User
|
|
Media
|
|
title Text
|
|
path FilePath
|
|
thumbPath FilePath
|
|
time UTCTime
|
|
description Text
|
|
tags Texts
|
|
|
|
-- By default this file is used in Model.hs (which is imported by Foundation.hs)
|