Function: vc-hg-command

vc-hg-command is a byte-compiled function defined in vc-hg.el.gz.

Signature

(vc-hg-command BUFFER OKSTATUS FILE-OR-LIST &rest FLAGS)

Documentation

A wrapper around vc-do-command for use in vc-hg.el.

This function differs from vc-do-command in that it invokes vc-hg-program, and passes vc-hg-global-switches to it before FLAGS.

Source Code

;; Defined in /usr/src/emacs/lisp/vc/vc-hg.el.gz
;;; Internal functions

(defun vc-hg-command (buffer okstatus file-or-list &rest flags)
  "A wrapper around `vc-do-command' for use in vc-hg.el.
This function differs from `vc-do-command' in that it invokes
`vc-hg-program', and passes `vc-hg-global-switches' to it before FLAGS."
  ;; Disable pager.
  (let ((process-environment (cons "HGPLAIN=1" process-environment))
        (flags (append '("--config" "ui.report_untrusted=0") flags)))
    (apply #'vc-do-command (or buffer "*vc*")
           okstatus vc-hg-program file-or-list
           (if (stringp vc-hg-global-switches)
               (cons vc-hg-global-switches flags)
             (append vc-hg-global-switches
                     flags)))))