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 content [MediumId] samplePic FilePath Maybe deriving Eq Show Medium title Text path FilePath time UTCTime owner UserId description Textarea tags Texts album AlbumId deriving Eq Show -- By default this file is used in Model.hs (which is imported by Foundation.hs)