From 0041012498384f3d882b14eecb369bc809b6592e Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 21 May 2024 12:09:45 -0400 Subject: [PATCH] guard pushEmpty --- CmdLine/GitRemoteAnnex.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/CmdLine/GitRemoteAnnex.hs b/CmdLine/GitRemoteAnnex.hs index 737a109443..a9c62f5afd 100644 --- a/CmdLine/GitRemoteAnnex.hs +++ b/CmdLine/GitRemoteAnnex.hs @@ -351,7 +351,7 @@ incrementalPush st rmt oldtrackingrefs newtrackingrefs = guardPush st $ do ) pushEmpty :: State -> Remote -> Annex (Bool, State) -pushEmpty st rmt = do +pushEmpty st rmt = guardPush st $ do oldmanifest <- maybe (downloadManifestWhenPresent rmt) pure (manifestCache st) let manifest = mkManifest mempty