From: Gustav Hållberg <gustav@virtutech.com>
Date: Sat, 1 Aug 2009 21:21:13 +0000 (+0200)
Subject: stgit.el: Run "git rm" with "-q" to reduce spam
X-Git-Tag: v0.15-rc2~11^2~54
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/stgit/commitdiff_plain/5115dea02ba6a90485f2a0d7b77e90a01f0d00a5?ds=inline

stgit.el: Run "git rm" with "-q" to reduce spam

Signed-off-by: Gustav Hållberg <gustav@virtutech.com>
---

diff --git a/contrib/stgit.el b/contrib/stgit.el
index 97a6d13..65fe68a 100644
--- a/contrib/stgit.el
+++ b/contrib/stgit.el
@@ -878,9 +878,9 @@ (defun stgit-show ()
 
 (defun stgit-move-change-to-index (file)
   "Copies the workspace state of FILE to index, using git add or git rm"
-  (let ((op (if (file-exists-p file) "add" "rm")))
+  (let ((op (if (file-exists-p file) '("add") '("rm" "-q"))))
     (stgit-capture-output "*git output*"
-      (stgit-run-git op "--" file))))
+      (apply 'stgit-run-git (append op '("--") (list file))))))
 
 (defun stgit-remove-change-from-index (file)
   "Unstages the change in FILE from the index"