From: Dmitry Gutov <dgutov@yandex.ru>
Date: Sat, 30 Jan 2016 03:55:32 +0000 (+0300)
Subject: Don't pass DIR to 'hg status'
X-Git-Tag: emacs-25.0.90~14
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=06083cf41c473404d246de9b91a0116f38c5485f;p=emacs.git

Don't pass DIR to 'hg status'

* lisp/vc/vc-hg.el (vc-hg-dir-status-files):
Don't pass DIR to 'hg status' (bug#22481).
---

diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el
index 8cb3547b13b..2d8bab70598 100644
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -647,10 +647,14 @@ REV is the revision to check out into WORKFILE."
 ;; Follows vc-exec-after.
 (declare-function vc-set-async-update "vc-dispatcher" (process-buffer))
 
-(defun vc-hg-dir-status-files (dir files update-function)
-  (apply 'vc-hg-command (current-buffer) 'async dir "status"
-         (concat "-mardu" (if files "i"))
-         "-C" files)
+(defun vc-hg-dir-status-files (_dir files update-function)
+  ;; XXX: We can't pass DIR directly to 'hg status' because that
+  ;; returns all ignored files if FILES is non-nil (bug#22481).
+  ;; If honoring DIR ever becomes important, try using '-I DIR/'.
+  (vc-hg-command (current-buffer) 'async files
+                 "status"
+                 (concat "-mardu" (if files "i"))
+                 "-C")
   (vc-run-delayed
     (vc-hg-after-dir-status update-function)))