diff options
| author | Joris Guyonvarch | 2015-04-11 19:20:04 +0200 |
|---|---|---|
| committer | Joris Guyonvarch | 2015-04-11 19:20:04 +0200 |
| commit | 4ddd6d1f6df2bab75d42b6d45b816e92e7173529 (patch) | |
| tree | 09ddfd62fe32e210a87eb15eb86ee07ab9f24623 /src/Model/Detail.hs | |
| parent | 88b7f848da3515d67cfb989b98ad5285a037993e (diff) | |
| download | ad-listener-4ddd6d1f6df2bab75d42b6d45b816e92e7173529.tar.gz ad-listener-4ddd6d1f6df2bab75d42b6d45b816e92e7173529.tar.bz2 ad-listener-4ddd6d1f6df2bab75d42b6d45b816e92e7173529.zip | |
Fixing parsing errors, and use Text from now
Diffstat (limited to 'src/Model/Detail.hs')
| -rw-r--r-- | src/Model/Detail.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Model/Detail.hs b/src/Model/Detail.hs index f00a7eb..684a718 100644 --- a/src/Model/Detail.hs +++ b/src/Model/Detail.hs @@ -2,6 +2,8 @@ module Model.Detail ( Detail(..) ) where +import qualified Data.Text as T + data Detail = Detail - { description :: Maybe String + { description :: Maybe T.Text } deriving (Eq, Read, Show) |