From 9d9bad89241bfa14255361dd8452ad40291a9684 Mon Sep 17 00:00:00 2001
From: Gregor Kleen <gkleen@yggdrasil.li>
Date: Mon, 25 Jan 2016 13:25:18 +0000
Subject: Cleaned up printer declaration

---
 server/default-conf/Main.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'server/default-conf/Main.hs')

diff --git a/server/default-conf/Main.hs b/server/default-conf/Main.hs
index 982f50e..39e500d 100644
--- a/server/default-conf/Main.hs
+++ b/server/default-conf/Main.hs
@@ -19,5 +19,5 @@ main = thermoprintServer (Nat runSqlite) $ def `withPrinters` printers
     runSqlite :: ReaderT ConnectionPool (LoggingT IO) a -> IO a
     runSqlite = runStderrLoggingT . withSqlitePool "thermoprint.sqlite" 1 . runReaderT
 
-    printers = [ PS Debug
+    printers = [ pure debugPrint
                ]
-- 
cgit v1.2.3