Enable multi-urls in config file

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