Configurable path

app/Main.hs

@@ -1,8 +1,9 @@
 module Main where
 
 import qualified MyLib (defaultMain)
+import System.Environment (getArgs)
 
 main :: IO ()
 main = do
-  putStrLn "Hello, Haskell!"
-  MyLib.defaultMain
+  [path] <- getArgs
+  MyLib.defaultMain path