1 2 3 4 5 6 7
module Model.Detail ( Detail(..) ) where data Detail = Detail { description :: Maybe String } deriving (Eq, Read, Show)