diff options
Diffstat (limited to 'servant')
-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 |