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

Fix "ghc-mod root" leaving garbage in tmp

Browse Source
This commit is contained in:
Tomas Janousek 2016-10-10 22:17:11 +02:00
parent b7cda9e9b9
commit 29d149866e
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Language/Haskell/GhcMod/Debug.hs
View File

@ -169,4 +169,5 @@ mapDoc kd ad m = vcat $
rootInfo :: forall m. (IOish m, GmOut m, GmEnv m) => m String rootInfo :: forall m. (IOish m, GmOut m, GmEnv m) => m String
rootInfo = do rootInfo = do
crdl <- findCradleNoLog =<< (optPrograms <$> options) crdl <- findCradleNoLog =<< (optPrograms <$> options)
liftIO $ cleanupCradle crdl
return $ cradleRootDir crdl ++ "\n" return $ cradleRootDir crdl ++ "\n"