summaryrefslogtreecommitdiff
path: root/haskell/src/SpaceTraders/Database/Utils.hs
diff options
context:
space:
mode:
authorJulien Dessaux2023-07-19 11:56:17 +0200
committerJulien Dessaux2023-07-19 11:56:17 +0200
commit15a7d5bef97557fc0f8a7b3fe4a68bf84a807daa (patch)
treedbc19fceb7b4b6d7e7961a784b9da027bb65ff3f /haskell/src/SpaceTraders/Database/Utils.hs
parent[haskell] Refactored everything with a ReaderT pattern (diff)
downloadspacetraders-15a7d5bef97557fc0f8a7b3fe4a68bf84a807daa.tar.gz
spacetraders-15a7d5bef97557fc0f8a7b3fe4a68bf84a807daa.tar.bz2
spacetraders-15a7d5bef97557fc0f8a7b3fe4a68bf84a807daa.zip
[haskell] refactoring
Diffstat (limited to '')
-rw-r--r--haskell/src/SpaceTraders/Database/Utils.hs11
1 files changed, 0 insertions, 11 deletions
diff --git a/haskell/src/SpaceTraders/Database/Utils.hs b/haskell/src/SpaceTraders/Database/Utils.hs
deleted file mode 100644
index 4d933bd..0000000
--- a/haskell/src/SpaceTraders/Database/Utils.hs
+++ /dev/null
@@ -1,11 +0,0 @@
-module SpaceTraders.Database.Utils
- ( decodeText
- ) where
-
-import Data.Aeson
-import Data.ByteString.Builder(toLazyByteString)
-import qualified Data.Text as T
-import Data.Text.Encoding (encodeUtf8Builder)
-
-decodeText :: FromJSON a => T.Text -> Maybe a
-decodeText = decode . toLazyByteString . encodeUtf8Builder