git.iko.soy/obelisk
on decrease-android-validity help sign in
obelisk/lib/executable-config/lookup/src-ios/Obelisk/ExecutableConfig/Lookup.hs
17 lines 566 B history raw
1{-# LANGUAGE LambdaCase #-}
2module Obelisk.ExecutableConfig.Lookup where
4import Data.ByteString (ByteString)
5import Data.Map (Map)
6import Data.Text (Text)
7import qualified Data.Text as T
8import qualified Data.Text.Encoding as T
9import Language.Javascript.JSaddle.WKWebView
10import System.FilePath.Posix
12import Obelisk.Configs.Internal.Directory
14getConfigs :: IO (Map Text ByteString)
15getConfigs = mainBundleResourcePath >>= \case
16 Nothing -> error "Could not get bundle resource path."
17 Just p -> getConfigsFromDirectory $ T.unpack (T.decodeUtf8 p) </> "config"