diff options
| -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 |
