diff options
| -rw-r--r-- | lisp/vc-arch.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/vc-arch.el b/lisp/vc-arch.el index a439174556e..5f24599241c 100644 --- a/lisp/vc-arch.el +++ b/lisp/vc-arch.el | |||
| @@ -309,7 +309,8 @@ Return non-nil if FILE is unchanged." | |||
| 309 | (defcustom vc-arch-mode-line-rewrite | 309 | (defcustom vc-arch-mode-line-rewrite |
| 310 | '(("\\`.*--\\(.*--.*\\)--\\(v?\\).*-\\([0-9]+\\)\\'" . "\\2\\3[\\1]")) | 310 | '(("\\`.*--\\(.*--.*\\)--\\(v?\\).*-\\([0-9]+\\)\\'" . "\\2\\3[\\1]")) |
| 311 | "Rewrite rules to shorten Arch's revision names on the mode-line." | 311 | "Rewrite rules to shorten Arch's revision names on the mode-line." |
| 312 | :type '(repeat (cons regexp string))) | 312 | :type '(repeat (cons regexp string)) |
| 313 | :group 'vc) | ||
| 313 | 314 | ||
| 314 | (defun vc-arch-mode-line-string (file) | 315 | (defun vc-arch-mode-line-string (file) |
| 315 | "Return string for placement in modeline by `vc-mode-line' for FILE." | 316 | "Return string for placement in modeline by `vc-mode-line' for FILE." |