Default to run action
This commit is contained in:
		@@ -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"] ->
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user