From 23f04635cc26e1b0553088f28553f518488a9fc8 Mon Sep 17 00:00:00 2001 From: Joris Date: Wed, 1 May 2019 15:52:32 +0200 Subject: Setup personal page with Hakyll --- src/Model/Translated.hs | 19 ------------------- 1 file changed, 19 deletions(-) delete mode 100644 src/Model/Translated.hs (limited to 'src/Model/Translated.hs') diff --git a/src/Model/Translated.hs b/src/Model/Translated.hs deleted file mode 100644 index b92ae39..0000000 --- a/src/Model/Translated.hs +++ /dev/null @@ -1,19 +0,0 @@ -{-# LANGUAGE DeriveGeneric #-} - -module Model.Translated where - -import GHC.Generics -import Data.Yaml - -import Model.Translation.Language - -data Translated = Translated - { english :: String - , french :: String - } deriving (Show, Read, Eq, Generic) - -instance FromJSON Translated - -getTranslation :: Language -> Translated -> String -getTranslation English translated = english translated -getTranslation French translated = french translated -- cgit v1.2.3