From ba0ecbf47e88e5c245ecd2e283b027759085cae6 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 25 Jul 2024 10:12:59 -0400 Subject: [PATCH] less indent --- Remote/Git.hs | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/Remote/Git.hs b/Remote/Git.hs index 71c416389d..ea4fd48319 100644 --- a/Remote/Git.hs +++ b/Remote/Git.hs @@ -481,11 +481,11 @@ dropKey' :: Git.Repo -> Remote -> State -> Maybe SafeDropProof -> Key -> Annex ( dropKey' repo r st@(State connpool duc _ _ _) proof key | isP2PHttp r = clientRemoveWithProof proof key unabletoremove r >>= \case - RemoveResultPlus True fanoutuuids -> - storefanout fanoutuuids - RemoveResultPlus False fanoutuuids -> do - storefanout fanoutuuids - unabletoremove + RemoveResultPlus True fanoutuuids -> + storefanout fanoutuuids + RemoveResultPlus False fanoutuuids -> do + storefanout fanoutuuids + unabletoremove | not $ Git.repoIsUrl repo = ifM duc ( guardUsable repo (giveup "cannot access remote") removelocal , giveup "remote does not have expected annex.uuid value"