@@ -270,7 +270,7 @@ verifyNoChanges git commitHash vsn =
270270
271271verifyZip :: Env -> Pkg.Name -> V.Version -> Task.Task Exit.Publish Http.Sha
272272verifyZip (Env root _ manager _ _) pkg vsn =
273− withTempDir root $ \prepublishDir ->
273+ withPrepublishDir root $ \prepublishDir ->
274274 do let url = toZipUrl pkg vsn
275275
276276 (sha, archive) <-
@@ -294,8 +294,8 @@ toZipUrl pkg vsn =
294294 "https://github.com/" ++ Pkg.toUrl pkg ++ "/zipball/" ++ V.toChars vsn ++ "/"
295295
296296
297−withTempDir :: FilePath -> (FilePath -> Task.Task x a) -> Task.Task x a
298−withTempDir root callback =
297+withPrepublishDir :: FilePath -> (FilePath -> Task.Task x a) -> Task.Task x a
298+withPrepublishDir root callback =
299299 let
300300 dir = Stuff.prepublishDir root
301301 in