diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-04-18 14:23:34 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-04-18 14:23:42 -0400 |
| commit | 2781e270c7f388d4d0e252240b84b4a299d040fd (patch) | |
| tree | 922ce19eded16c736ff1248862f3cec9dba70349 /Command/Fsck.hs | |
| parent | 5f62e03e618b20a32e3a927be2bdf71dd525d5ae (diff) | |
fsck --from remote: Avoid downloading a key if it would go over the annex.diskreserve limit.
Diffstat (limited to 'Command/Fsck.hs')
| -rw-r--r-- | Command/Fsck.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/Command/Fsck.hs b/Command/Fsck.hs index 74cff7491..39dba08dd 100644 --- a/Command/Fsck.hs +++ b/Command/Fsck.hs @@ -135,14 +135,16 @@ performRemote key file backend numcopies remote = let cleanup = liftIO $ catchIO (removeFile tmp) (const noop) cleanup cleanup `after` a tmp - getfile tmp = - ifM (Remote.retrieveKeyFileCheap remote key tmp) + getfile tmp = ifM (checkDiskSpace (Just tmp) key 0) + ( ifM (Remote.retrieveKeyFileCheap remote key tmp) ( return True , ifM (Annex.getState Annex.fast) ( return False , Remote.retrieveKeyFile remote key Nothing tmp dummymeter ) ) + , return False + ) dummymeter _ = noop startKey :: Incremental -> Key -> NumCopies -> CommandStart |