module Model.Detail ( Detail(..) ) where data Detail = Detail { description :: Maybe String } deriving (Eq, Read, Show)