aboutsummaryrefslogtreecommitdiff
path: root/src/Model/Header.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Model/Header.hs')
-rw-r--r--src/Model/Header.hs25
1 files changed, 0 insertions, 25 deletions
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