Mercurial > emacs
changeset 100177:5a223111838e
(vc-arch-diff-switches): New option, for consistency with other backends.
(vc-arch-diff): Apply switches.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Wed, 03 Dec 2008 07:35:14 +0000 |
| parents | 5706ca7c3d02 |
| children | 6974583b6281 |
| files | lisp/vc-arch.el |
| diffstat | 1 files changed, 16 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc-arch.el Wed Dec 03 06:35:02 2008 +0000 +++ b/lisp/vc-arch.el Wed Dec 03 07:35:14 2008 +0000 @@ -1,6 +1,7 @@ ;;; vc-arch.el --- VC backend for the Arch version-control system -;; Copyright (C) 2004, 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 2004, 2005, 2006, 2007, 2008 +;; Free Software Foundation, Inc. ;; Author: FSF (see vc.el for full credits) ;; Maintainer: Stefan Monnier <monnier@gnu.org> @@ -64,6 +65,19 @@ ;;; Customization options ;;; +;; It seems Arch diff does not accept many options, so this is not +;; very useful. It exists mainly so that the VC backends are all +;; consistent with regards to their treatment of diff switches. +(defcustom vc-arch-diff-switches t + "String or list of strings specifying switches for Arch diff under VC. +If nil, use the value of `vc-diff-switches'. If t, use no switches." + :type '(choice (const :tag "Unspecified" nil) + (const :tag "None" t) + (string :tag "Argument String") + (repeat :tag "Argument List" :value ("") string)) + :version "23.1" + :group 'vc) + (define-obsolete-variable-alias 'vc-arch-command 'vc-arch-program "23.1") (defcustom vc-arch-program @@ -450,8 +464,7 @@ (or buffer "*vc-diff*") (if async 'async 1) nil "file-diffs" - ;; Arch does not support the typical flags. - ;; (vc-switches 'Arch 'diff) + (vc-switches 'Arch 'diff) (file-relative-name file) (if (equal oldvers (vc-working-revision file)) nil