Fix prepareCabalHelper when dist/ doesn't exist yet
This commit is contained in:
parent
0b5de23ac9
commit
f998c63c73
@ -133,7 +133,7 @@ prepareCabalHelper = do
|
|||||||
let projdir = cradleRootDir crdl
|
let projdir = cradleRootDir crdl
|
||||||
distdir = projdir </> "dist"
|
distdir = projdir </> "dist"
|
||||||
readProc <- gmReadProcess
|
readProc <- gmReadProcess
|
||||||
liftIO $ prepare readProc projdir distdir
|
withCabal $ liftIO $ prepare readProc projdir distdir
|
||||||
|
|
||||||
withCabal :: (IOish m, GmEnv m, GmLog m) => m a -> m a
|
withCabal :: (IOish m, GmEnv m, GmLog m) => m a -> m a
|
||||||
withCabal action = do
|
withCabal action = do
|
||||||
|
Loading…
Reference in New Issue
Block a user