mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

reorder

Browse source
This commit is contained in:
Joey Hess 2015-12-09 19:38:37 -04:00
parent bf98d2bd77
commit aa88851ec1
Failed to extract signature
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Annex/Content.hs
View file

@ -602,10 +602,10 @@ removeAnnex (ContentRemovalLock key) = withObjectLoc key remove removedirect
remove file = cleanObjectLoc key $ do remove file = cleanObjectLoc key $ do
secureErase file secureErase file
liftIO $ nukeFile file liftIO $ nukeFile file
removeInodeCache key
mapM_ (void . tryIO . resetPointerFile key) mapM_ (void . tryIO . resetPointerFile key)
=<< Database.Keys.getAssociatedFiles key =<< Database.Keys.getAssociatedFiles key
Database.Keys.removeInodeCaches key Database.Keys.removeInodeCaches key
removeInodeCache key
removedirect fs = do removedirect fs = do
cache <- recordedInodeCache key cache <- recordedInodeCache key
removeInodeCache key removeInodeCache key