diff --git a/byg/app/Main.hs b/byg/app/Main.hs index 3497bbe..f0821de 100644 --- a/byg/app/Main.hs +++ b/byg/app/Main.hs @@ -17,7 +17,7 @@ main :: IO () main = do args <- getArgs case args of - ["run"] -> do + [] -> do ((), filesWritten) <- DR.runDepRunMIO $ DR.runDeps dependencies putStrLn ("Files which could have been written: " ++ show filesWritten) ["tree"] ->