aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--servant/src/Main.hs3
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
11import Thermoprint 11import Thermoprint
12import Thermoprint.Api 12import Thermoprint.Api
13import PrintOut
13 14
14import qualified Data.Text.Lazy as TL 15import qualified Data.Text.Lazy as TL
15import qualified Data.ByteString.Lazy.Char8 as LBS 16import qualified Data.ByteString.Lazy.Char8 as LBS
@@ -144,7 +145,7 @@ thermoprintApi = Proxy
144 145
145main :: IO () 146main :: IO ()
146main = do 147main = 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