/[emacs]/emacs/lisp/vc-arch.el
ViewVC logotype

Diff of /emacs/lisp/vc-arch.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3.2.5 by miles, Tue Jul 6 09:38:17 2004 UTC revision 1.3.2.6 by miles, Tue Jul 6 10:23:35 2004 UTC
# Line 309  Return non-nil if FILE is unchanged." Line 309  Return non-nil if FILE is unchanged."
309  (defcustom vc-arch-mode-line-rewrite  (defcustom vc-arch-mode-line-rewrite
310    '(("\\`.*--\\(.*--.*\\)--\\(v?\\).*-\\([0-9]+\\)\\'" . "\\2\\3[\\1]"))    '(("\\`.*--\\(.*--.*\\)--\\(v?\\).*-\\([0-9]+\\)\\'" . "\\2\\3[\\1]"))
311    "Rewrite rules to shorten Arch's revision names on the mode-line."    "Rewrite rules to shorten Arch's revision names on the mode-line."
312    :type '(repeat (cons regexp string)))    :type '(repeat (cons regexp string))
313      :group 'vc)
314    
315  (defun vc-arch-mode-line-string (file)  (defun vc-arch-mode-line-string (file)
316    "Return string for placement in modeline by `vc-mode-line' for FILE."    "Return string for placement in modeline by `vc-mode-line' for FILE."

Legend:
Removed from v.1.3.2.5  
changed lines
  Added in v.1.3.2.6

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26