diff options
Diffstat (limited to 'src/Main.hs')
-rw-r--r-- | src/Main.hs | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/src/Main.hs b/src/Main.hs index 27dcfa5..75749cd 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -4,17 +4,11 @@ module Main ( main ) where -import qualified Data.Text.IO as T - import qualified AdListener import qualified Conf main :: IO () main = do - eitherConfig <- Conf.parse "application.conf" - case eitherConfig of - Right config -> - AdListener.start config - Left message -> - T.putStrLn message + conf <- Conf.parse "application.conf" + AdListener.start conf |