one more info to Cradle.

This commit is contained in:
Kazu Yamamoto 2013-03-04 11:21:20 +09:00
parent e64cd3b108
commit 73cfde0062

View File

@ -65,10 +65,11 @@ addNewLine = (++ "\n")
---------------------------------------------------------------- ----------------------------------------------------------------
data Cradle = Cradle { data Cradle = Cradle {
cradleCurrentDir :: FilePath cradleCurrentDir :: FilePath
, cradleCabalDir :: Maybe FilePath , cradleCabalDir :: Maybe FilePath
, cradleCabalFile :: Maybe FilePath , cradleCabalFile :: Maybe FilePath
, cradlePackageConfOpts :: Maybe [String] , cradlePackageConfOpts :: Maybe [String]
, cradleGHCVersion :: String
} deriving Show } deriving Show
---------------------------------------------------------------- ----------------------------------------------------------------