[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/vc-arch.el [emacs-unicode-2]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/vc-arch.el [emacs-unicode-2] |
Date: |
Tue, 29 Jun 2004 13:10:16 -0400 |
Index: emacs/lisp/vc-arch.el
diff -c emacs/lisp/vc-arch.el:1.6.2.2 emacs/lisp/vc-arch.el:1.6.2.3
*** emacs/lisp/vc-arch.el:1.6.2.2 Mon Jun 28 07:28:47 2004
--- emacs/lisp/vc-arch.el Tue Jun 29 16:45:06 2004
***************
*** 309,315 ****
(defcustom vc-arch-mode-line-rewrite
'(("\\`.*--\\(.*--.*\\)--\\(v?\\).*-\\([0-9]+\\)\\'" . "\\2\\3[\\1]"))
"Rewrite rules to shorten Arch's revision names on the mode-line."
! :type '(repeat (cons regexp string)))
(defun vc-arch-mode-line-string (file)
"Return string for placement in modeline by `vc-mode-line' for FILE."
--- 309,316 ----
(defcustom vc-arch-mode-line-rewrite
'(("\\`.*--\\(.*--.*\\)--\\(v?\\).*-\\([0-9]+\\)\\'" . "\\2\\3[\\1]"))
"Rewrite rules to shorten Arch's revision names on the mode-line."
! :type '(repeat (cons regexp string))
! :group 'vc)
(defun vc-arch-mode-line-string (file)
"Return string for placement in modeline by `vc-mode-line' for FILE."