From: Joey Hess <joeyh@joeyh.name>
Date: Mon, 11 Oct 2021 18:55:57 +0000 (-0400)
Subject: remove broken code
X-Git-Tag: archive/raspbian/10.20250416-2+rpi1~1^2~79^2~159
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=2e94ba9c70b351935b987a4a9abc0c3d8a9bbf9c;p=git-annex.git

remove broken code

git-annex-shell fsck has never worked, back in
commit 1ffb3bb0ba3c87d14b896dac2a308de9376a44f1 I discussed maybe adding
it one day, but this code has always failed.
---

diff --git a/Remote/Git.hs b/Remote/Git.hs
index 7f615d114e..1200f7ae9a 100644
--- a/Remote/Git.hs
+++ b/Remote/Git.hs
@@ -728,11 +728,7 @@ copyToRemote' repo r st@(State connpool duc _ _ _) key file meterupdate
 
 fsckOnRemote :: Git.Repo -> [CommandParam] -> Annex (IO Bool)
 fsckOnRemote r params
-	| Git.repoIsUrl r = do
-		s <- Ssh.git_annex_shell NoConsumeStdin r "fsck" params []
-		return $ case s of
-			Nothing -> return False
-			Just (c, ps) -> batchCommand c ps
+	| Git.repoIsUrl r = return $ return False
 	| otherwise = return $ do
 		program <- programPath
 		r' <- Git.Config.read r