Commit e0c9fec8 authored by Neil Vice's avatar Neil Vice
Browse files

Don't attempt to rename dist if it is already named correctly

parent cb4f1ac2
......@@ -1191,7 +1191,7 @@ installLocalTarballPackage verbosity jobLimit pkgid
distDirPathTmp = absUnpackedPath </> (defaultDistPref ++ "-tmp")
distDirPathNew = absUnpackedPath </> distPref
distDirExists <- doesDirectoryExist distDirPath
when distDirExists $ do
when (distDirExists && distDirPath /= distDirPathNew) $ do
-- NB: we need to handle the case when 'distDirPathNew' is a
-- subdirectory of 'distDirPath' (e.g. 'dist/dist-sandbox-3688fbc2').
debug verbosity $ "Renaming '" ++ distDirPath ++ "' to '"
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment