fix hdiutil eject

This commit is contained in:
Joey Hess 2013-11-25 14:01:41 -04:00
parent 2398f0983d
commit dabae084e8

View file

@ -168,7 +168,7 @@ upgradeToDistribution newdir cleanup distributionfile = do
sanitycheck newdir sanitycheck newdir
void $ boolSystem "hdiutil" void $ boolSystem "hdiutil"
[ Param "eject" [ Param "eject"
, Param distributionfile , File tmpdir
] ]
let deleteold = do let deleteold = do
deleteFromManifest $ olddir </> "Contents" </> "MacOS" deleteFromManifest $ olddir </> "Contents" </> "MacOS"