diff options
-rw-r--r-- | Annex/Content.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/Content.hs b/Annex/Content.hs index e635b97a3..d73132a0e 100644 --- a/Annex/Content.hs +++ b/Annex/Content.hs @@ -602,10 +602,10 @@ removeAnnex (ContentRemovalLock key) = withObjectLoc key remove removedirect remove file = cleanObjectLoc key $ do secureErase file liftIO $ nukeFile file - removeInodeCache key mapM_ (void . tryIO . resetPointerFile key) =<< Database.Keys.getAssociatedFiles key Database.Keys.removeInodeCaches key + removeInodeCache key removedirect fs = do cache <- recordedInodeCache key removeInodeCache key |