hasufell/ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix stray tempdir

Browse Source
This commit is contained in:
Daniel Gröber 2015-06-01 11:58:31 +02:00
parent e6427ef643
commit 14c097530e
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Language/Haskell/GhcMod/Cradle.hs
View File

@ -57,12 +57,11 @@ customCradle wdir = do
cabalFile <- MaybeT $ findCabalFile wdir cabalFile <- MaybeT $ findCabalFile wdir
let cabalDir = takeDirectory cabalFile let cabalDir = takeDirectory cabalFile
cradleFile <- MaybeT $ findCradleFile cabalDir cradleFile <- MaybeT $ findCradleFile cabalDir
tmpDir <- liftIO $ newTempDir cabalDir
pkgDbStack <- liftIO $ parseCradle cradleFile pkgDbStack <- liftIO $ parseCradle cradleFile
return Cradle { return Cradle {
cradleCurrentDir = wdir cradleCurrentDir = wdir
, cradleRootDir = cabalDir , cradleRootDir = cabalDir
, cradleTempDir = tmpDir , cradleTempDir = error "tmpDir"
, cradleCabalFile = Just cabalFile , cradleCabalFile = Just cabalFile
, cradlePkgDbStack = pkgDbStack , cradlePkgDbStack = pkgDbStack
} }