summaryrefslogtreecommitdiff
path: root/Command/Unannex.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-11-28 15:28:20 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-11-28 15:28:20 -0400
commit653ad35a9f728ed5b3e9b557cdfb15a19b4afe16 (patch)
tree40e8ed2880ea291f33ef20e931b9d9d1d8c7189c /Command/Unannex.hs
parent92e5d28ca83d057a3d8f5d7d30806642de699172 (diff)
In .gitattributes, the git-annex-numcopies attribute can be used to control the number of copies to retain of different types of files.
Diffstat (limited to 'Command/Unannex.hs')
-rw-r--r--Command/Unannex.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/Command/Unannex.hs b/Command/Unannex.hs
index 90ae55058..9580fc5e7 100644
--- a/Command/Unannex.hs
+++ b/Command/Unannex.hs
@@ -32,8 +32,7 @@ start file = isAnnexed file $ \(key, backend) -> do
perform :: FilePath -> Key -> Backend -> SubCmdPerform
perform file key backend = do
-- force backend to always remove
- Annex.flagChange "force" $ FlagBool True
- ok <- Backend.removeKey backend key
+ ok <- Backend.removeKey backend key (Just 0)
if ok
then return $ Just $ cleanup file key
else return Nothing