Function: vc-hg-dir-status-files

vc-hg-dir-status-files is a byte-compiled function defined in vc-hg.el.gz.

Signature

(vc-hg-dir-status-files DIR FILES UPDATE-FUNCTION)

Source Code

;; Defined in /usr/src/emacs/lisp/vc/vc-hg.el.gz
(defun vc-hg-dir-status-files (dir files update-function)
  (require 'vc-dir)
  ;; XXX: We can't pass DIR directly to 'hg status' because that
  ;; returns all ignored files if FILES is non-nil (bug#22481).
  (let ((default-directory dir)
        (limit vc-dir-process-output-limit))
    (set-process-query-on-exit-flag
     (apply #'vc-hg-command '(t nil) 'async files
            "status" (concat "-mardu" (if files "i")) "-C"
            (if (version<= "4.2" (vc-hg--program-version))
                '("--config" "commands.status.relative=1")
              '("re:" "-I" ".")))
     nil)
    (vc-run-delayed-success 0
      (let ((vc-dir-process-output-limit limit))
        (vc-dir-maybe-narrow-and-show-more-button)
        (vc-hg-after-dir-status update-function)))))