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 7f615d114ecdc375c015063b2c90ad8b77a74c1d..1200f7ae9a068005bc43b6ff70344fdd10cc71df 100644 (file)
--- 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