in verbosity mode the compiler warns about missing paths

This commit is contained in:
kr.angelov committed 2014-05-21 07:33:35 +00:00
1 parent 43eaedd326
commit 75475b579d
1 file changed
+2 -1
+2 -1
View File
@@ -93,7 +93,8 @@ extendPathEnv opts = liftIO $ do
_ -> do exists <- doesDirectoryExist p
if exists
then return [p]
else return []
else do when (verbAtLeast opts Verbose) $ putStrLn ("ignore path "++p)
return []
getSubdirs :: FilePath -> IO [FilePath]
getSubdirs dir = do