remove broken code

git-annex-shell fsck has never worked, back in
commit 1ffb3bb0ba I discussed maybe adding
it one day, but this code has always failed.
This commit is contained in:
Joey Hess 2021-10-11 14:55:57 -04:00
parent 5e3fe816ef
commit 2e94ba9c70
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

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