From aafc45eb5eed3839a5210a7d48928d975df6a296 Mon Sep 17 00:00:00 2001 From: Joris Guyonvarch Date: Sat, 11 Apr 2015 20:38:08 +0200 Subject: Handle a configuration file to save the url --- src/Model/Resume.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'src/Model/Resume.hs') diff --git a/src/Model/Resume.hs b/src/Model/Resume.hs index 9d966df..3d307f2 100644 --- a/src/Model/Resume.hs +++ b/src/Model/Resume.hs @@ -5,13 +5,14 @@ module Model.Resume ) where import Data.List ((\\)) +import Data.Text (Text) import qualified Data.Text as T import Model.URL data Resume = Resume - { name :: T.Text - , price :: Maybe T.Text + { name :: Text + , price :: Maybe Text , url :: URL } deriving (Eq, Read, Show) -- cgit v1.2.3