diff options
Diffstat (limited to 'Assistant/Threads/Watcher.hs')
-rw-r--r-- | Assistant/Threads/Watcher.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/Assistant/Threads/Watcher.hs b/Assistant/Threads/Watcher.hs index 4201a6404..58c4c2e30 100644 --- a/Assistant/Threads/Watcher.hs +++ b/Assistant/Threads/Watcher.hs @@ -300,6 +300,11 @@ onDel file _ = do onDel' :: FilePath -> Annex () onDel' file = do + whenM isDirect $ do + mkey <- catKeyFile file + case mkey of + Nothing -> noop + Just key -> void $ removeAssociatedFile key file Annex.Queue.addUpdateIndex =<< inRepo (Git.UpdateIndex.unstageFile file) |