1 files changed, 1 insertions, 1 deletions

diff --git a/server/test/Thermoprint/ServerSpec.hs b/server/test/Thermoprint/ServerSpec.hs
index fe06a05..495ad10 100644
--- a/server/test/Thermoprint/ServerSpec.hs
+++ b/server/test/Thermoprint/ServerSpec.hs
@@ -41,7 +41,7 @@ setup = withSystemTempFile "thermoprint.sqlite" $ \fp h -> hClose h >> do
   tManager <- TestManager <$> newEmptyTMVarIO
   termSem <- newQSem 0
   let
-    runSqlite :: ReaderT ConnectionPool (LoggingT IO) a -> IO a
+    runSqlite :: ReaderT ConnectionPool (NoLoggingT IO) a -> IO a
     runSqlite = runNoLoggingT . withSqlitePool (T.pack fp) 1 . runReaderT
 
     printers = [ ( pure $ PM tPM