summaryrefslogtreecommitdiff
path: root/Command/Watch.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-06-07 21:17:10 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-06-07 21:17:10 -0400
commit7d78cbf97ca9d5a579f05b4ba735be69bafdef97 (patch)
tree783d3638a72cd99bd95be4511af735874db57e5a /Command/Watch.hs
parent20f425be19dafda17c904945dfbf069c496a4ff8 (diff)
use git queue for rm too
Diffstat (limited to 'Command/Watch.hs')
-rw-r--r--Command/Watch.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/Command/Watch.hs b/Command/Watch.hs
index 4447d4ffe..bf544679d 100644
--- a/Command/Watch.hs
+++ b/Command/Watch.hs
@@ -124,14 +124,14 @@ onAddSymlink file = go =<< Backend.lookupFile file
{- The file could reappear at any time, so --cached is used, to only delete
- it from the index. -}
onDel :: FilePath -> Annex ()
-onDel file = inRepo $ Git.Command.run "rm"
- [Params "--quiet --cached --ignore-unmatch --", File file]
+onDel file = Annex.Queue.addCommand "rm"
+ [Params "--quiet --cached --ignore-unmatch --"] [file]
{- A directory has been deleted, or moved, so tell git to remove anything
- that was inside it from its cache. -}
onDelDir :: FilePath -> Annex ()
-onDelDir dir = inRepo $ Git.Command.run "rm"
- [Params "--quiet -r --cached --ignore-unmatch --", File dir]
+onDelDir dir = Annex.Queue.addCommand "rm"
+ [Params "--quiet -r --cached --ignore-unmatch --"] [dir]
{- Called when there's an error with inotify. -}
onErr :: String -> Annex ()