Remove use of DoAndIfThenElse extension, absent in GHC 6.12.3.

This commit is contained in:
Conal Elliott 2012-02-02 14:22:37 -08:00
parent 3e75be3e18
commit db0265268b
1 changed files with 2 additions and 2 deletions

View File

@ -1,4 +1,4 @@
{-# LANGUAGE DoAndIfThenElse #-}
-- {-# LANGUAGE DoAndIfThenElse #-} -- not in GHC 6.12.3
module CabalDev (modifyOptions) where
@ -38,7 +38,7 @@ searchIt path = do
a <- doesDirectoryExist (mpath path)
if a then do
findConf (mpath path)
else
else
searchIt $ init path
where
mpath a = joinPath a </> "cabal-dev/"