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:
parent
5e3fe816ef
commit
2e94ba9c70
1 changed files with 1 additions and 5 deletions
|
@ -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
|
||||||
|
|
Loading…
Add table
Reference in a new issue