HTML for ServerError; drop mock database effect handler

2024-10-22 18:55:15 -05:00
parent 3f76917c40
commit 13e8a11e83
7 changed files with 41 additions and 51 deletions
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -47,14 +47,6 @@ runAppEff env = runEff
              . runLoggerPSQL
              . inject

-runAppDebug :: AppEnv -> AppEff a -> IO (Either ServerError a)
-runAppDebug env = runEff
-                . runErrorNoCallStack
-                . runReader env
-                . runDatabaseDebug
-                . runLoggerConsole
-                . inject
-
 port :: Int
 port = 8080