git.iko.soy/obelisk
on master help sign in
Fix warnings in executable-config
commit37c84d686ad95248c409ae77209aa321208011d0 authorAli Abrar <aliabrar@gmail.com> dateFri 14 Jun 2019, 20:50 (7 years ago) parentcbf3c23
2 files changed+2−2
compare with master
unifiedsplit
lib/executable-config/lookup/src-android/Obelisk/ExecutableConfig/Lookup.hs+1 lib/executable-config/lookup/src-ghcjs/Obelisk/ExecutableConfig/Lookup.hs+1−2
lib/executable-config/lookup/src-android/Obelisk/ExecutableConfig/Lookup.hs+1
@@ -4,6 +4,7 @@ module Obelisk.ExecutableConfig.Lookup where
44
55import Control.Exception (bracket)
66import Control.Monad (forM)
7+import Data.ByteString (ByteString)
78import qualified Data.ByteString as BS
89import Data.Map (Map)
910import qualified Data.Map as Map
lib/executable-config/lookup/src-ghcjs/Obelisk/ExecutableConfig/Lookup.hs+1−2
@@ -8,7 +8,6 @@ import Data.Map (Map)
88import qualified Data.Map as Map
99import Data.Maybe (catMaybes)
1010import Data.Text (Text)
11−import qualified Data.Text as T
1211import qualified Data.Text.Encoding as T
1312import Data.Traversable (for)
1413import GHCJS.DOM
@@ -40,4 +39,4 @@ getConfigs = do
4039 pure $ catMaybes list
4140 decodeOrFail x = case B64.decode (T.encodeUtf8 x) of
4241 Left e -> error ("Obelisk.ExecutableConfig.Lookup.getConfigs: error when decoding base64: " ++ e)
43− Right x -> x
42+ Right x' -> x'