on decrease-android-validity help sign in
18 lines 492 B history raw
1{-# LANGUAGE LambdaCase #-}
2{-# LANGUAGE OverloadedStrings #-}
3module Obelisk.ExecutableConfig.Lookup where
5import Data.Map (Map)
6import qualified Data.Map as Map
7import Data.Text (Text)
8import qualified Data.Text as T
9import Data.ByteString (ByteString)
10import qualified Data.ByteString as BS
11import System.Directory
12import System.FilePath
13import Control.Monad
15import Obelisk.Configs.Internal.Directory
17getConfigs :: IO (Map Text ByteString)
18getConfigs = getConfigsFromDirectory "config"