src/Model/Detail.hs


1
2
3
4
5
6
7
8
9
10
11
12

module Model.Detail
  ( Detail(..)
  ) where

import Data.Text

import Model.URL

data Detail = Detail
  { description :: Maybe Text
  , images :: [URL]
  } deriving (Eq, Read, Show)