diff options
| author | Gregor Kleen <gkleen@yggdrasil.li> | 2016-02-12 00:54:43 +0000 |
|---|---|---|
| committer | Gregor Kleen <gkleen@yggdrasil.li> | 2016-02-12 00:54:43 +0000 |
| commit | f4aa09d615a9cb77f1d13cbbc516be23a2d3cc69 (patch) | |
| tree | 5161dd00d07b976864d800bc5dbd3ae560498141 /server/default-conf | |
| parent | 6e89aaceb65815380f31674801dfebc084737ea2 (diff) | |
| download | thermoprint-f4aa09d615a9cb77f1d13cbbc516be23a2d3cc69.tar thermoprint-f4aa09d615a9cb77f1d13cbbc516be23a2d3cc69.tar.gz thermoprint-f4aa09d615a9cb77f1d13cbbc516be23a2d3cc69.tar.bz2 thermoprint-f4aa09d615a9cb77f1d13cbbc516be23a2d3cc69.tar.xz thermoprint-f4aa09d615a9cb77f1d13cbbc516be23a2d3cc69.zip | |
Prototype queue manager configuration
Diffstat (limited to 'server/default-conf')
| -rw-r--r-- | server/default-conf/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 | |||
| 19 | runSqlite :: ReaderT ConnectionPool (LoggingT IO) a -> IO a | 19 | runSqlite :: ReaderT ConnectionPool (LoggingT IO) a -> IO a |
| 20 | runSqlite = runStderrLoggingT . withSqlitePool "thermoprint.sqlite" 1 . runReaderT | 20 | runSqlite = runStderrLoggingT . withSqlitePool "thermoprint.sqlite" 1 . runReaderT |
| 21 | 21 | ||
| 22 | printers = [ pure debugPrint | 22 | printers = [ (pure debugPrint, def) |
| 23 | ] | 23 | ] |