From f4aa09d615a9cb77f1d13cbbc516be23a2d3cc69 Mon Sep 17 00:00:00 2001
From: Gregor Kleen <gkleen@yggdrasil.li>
Date: Fri, 12 Feb 2016 00:54:43 +0000
Subject: Prototype queue manager configuration

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

(limited to 'server/default-conf')

diff --git a/server/default-conf/Main.hs b/server/default-conf/Main.hs
index 39e500d..36f6c12 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 = [ pure debugPrint
+    printers = [ (pure debugPrint, def)
                ]
-- 
cgit v1.2.3