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/Conf.hs | 27 --------------------------- 1 file changed, 27 deletions(-) delete mode 100644 src/Conf.hs (limited to 'src/Conf.hs') diff --git a/src/Conf.hs b/src/Conf.hs deleted file mode 100644 index cd00fd9..0000000 --- a/src/Conf.hs +++ /dev/null @@ -1,27 +0,0 @@ -{-# LANGUAGE OverloadedStrings #-} - -module Conf - ( getConf - , Conf(..) - ) where - -import Data.Text (Text) -import qualified Data.ConfigManager as Conf - -import Daemon.Frequency (Frequency) - -data Conf = Conf - { port :: Int - , git :: String - , generateResumes :: Frequency - } deriving (Read, Eq, Show) - -getConf :: FilePath -> IO (Either Text Conf) -getConf path = - (flip fmap) (Conf.readConfig path) (\configOrError -> do - conf <- configOrError - Conf <$> - Conf.lookup "port" conf <*> - Conf.lookup "git" conf <*> - Conf.lookup "generateResumes" conf - ) -- cgit v1.2.3