careless bug fix.

This commit is contained in:
Kazu Yamamoto 2013-03-04 09:56:01 +09:00
parent 6f6d068048
commit 0501137839

View File

@ -45,7 +45,7 @@ fromCabalFile ghcOptions cradle = do
where
owdir = cradleCurrentDir cradle
Just cdir = cradleCabalDir cradle
Just cfile = cradleCabalDir cradle
Just cfile = cradleCabalFile cradle
removeMe :: FilePath -> [String] -> [String]
removeMe cabalfile = filter (/= me)