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 where
owdir = cradleCurrentDir cradle owdir = cradleCurrentDir cradle
Just cdir = cradleCabalDir cradle Just cdir = cradleCabalDir cradle
Just cfile = cradleCabalDir cradle Just cfile = cradleCabalFile cradle
removeMe :: FilePath -> [String] -> [String] removeMe :: FilePath -> [String] -> [String]
removeMe cabalfile = filter (/= me) removeMe cabalfile = filter (/= me)