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/Header.hs | 25 ------------------------- 1 file changed, 25 deletions(-) delete mode 100644 src/Model/Header.hs (limited to 'src/Model/Header.hs') diff --git a/src/Model/Header.hs b/src/Model/Header.hs deleted file mode 100644 index 7581fc5..0000000 --- a/src/Model/Header.hs +++ /dev/null @@ -1,25 +0,0 @@ -module Model.Header - ( Header(..) - , allHeaders - , headerLink - , headerKey - ) where - -import Model.Translation.Key (Key) -import qualified Model.Translation.Key as K - -data Header = - Resume - | Projects - deriving (Enum, Bounded, Show, Eq) - -allHeaders :: [Header] -allHeaders = [minBound..] - -headerLink :: Header -> String -headerLink Resume = "/" -headerLink Projects = "/projects" - -headerKey :: Header -> Key -headerKey Resume = K.Resume -headerKey Projects = K.Projects -- cgit v1.2.3