eidolon/config/models

48 lines
909 B
Text

User
name Text
slug Text
email Text
salt ByteString
salted ByteString
albums [AlbumId]
admin Bool
deriving Typeable Eq Show
Activator
token Text
user User
deriving Eq Show
Token
token ByteString
kind Text
user UserId Maybe
deriving Eq Show
Album
title Text
owner UserId
shares [UserId]
content [MediumId]
samplePic FP.FilePath Maybe
sampleWidth Int
deriving Eq Show
Medium
title Text
path FP.FilePath
thumb FP.FilePath
mime Text
time UTCTime
owner UserId
description Textarea
tags Texts
thumbWidth Int
album AlbumId
deriving Eq Show
Comment
author UserId Maybe
authorSlug Text Maybe
origin MediumId
parent CommentId Maybe
time UTCTime
content Markdown
deriving Show
-- By default this file is used in Model.hs (which is imported by Foundation.hs)