diff options
author | Gregor Kleen <gkleen@yggdrasil.li> | 2015-10-22 21:16:34 +0200 |
---|---|---|
committer | Gregor Kleen <gkleen@yggdrasil.li> | 2015-10-22 21:16:34 +0200 |
commit | 0c60bbc1b54782e86c82cc103690e6e9cd4b2e34 (patch) | |
tree | 889ca8727f68cffc79be2af2a1f446bf49bc90f8 | |
parent | b24a594ebc4d1f98cb93d7f6b706f91c92a011dc (diff) | |
download | thermoprint-0c60bbc1b54782e86c82cc103690e6e9cd4b2e34.tar thermoprint-0c60bbc1b54782e86c82cc103690e6e9cd4b2e34.tar.gz thermoprint-0c60bbc1b54782e86c82cc103690e6e9cd4b2e34.tar.bz2 thermoprint-0c60bbc1b54782e86c82cc103690e6e9cd4b2e34.tar.xz thermoprint-0c60bbc1b54782e86c82cc103690e6e9cd4b2e34.zip |
Fixed PrintOut
-rw-r--r-- | servant/src/Main.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/servant/src/Main.hs b/servant/src/Main.hs index 70d244c..0aa9eeb 100644 --- a/servant/src/Main.hs +++ b/servant/src/Main.hs | |||
@@ -10,6 +10,7 @@ | |||
10 | 10 | ||
11 | import Thermoprint | 11 | import Thermoprint |
12 | import Thermoprint.Api | 12 | import Thermoprint.Api |
13 | import PrintOut | ||
13 | 14 | ||
14 | import qualified Data.Text.Lazy as TL | 15 | import qualified Data.Text.Lazy as TL |
15 | import qualified Data.ByteString.Lazy.Char8 as LBS | 16 | import qualified Data.ByteString.Lazy.Char8 as LBS |
@@ -144,7 +145,7 @@ thermoprintApi = Proxy | |||
144 | 145 | ||
145 | main :: IO () | 146 | main :: IO () |
146 | main = do | 147 | main = do |
147 | execParser opts >>= runStderrLoggingT . main' | 148 | execParser opts >>= runNoLoggingT . main' |
148 | where | 149 | where |
149 | opts = info (helper <*> options) ( | 150 | opts = info (helper <*> options) ( |
150 | fullDesc | 151 | fullDesc |