From 99999a1d72bd57f7e902a66564599beb57b56011 Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Wed, 9 Dec 2009 06:04:09 +0000 Subject: [PATCH] Fix short log parsing and fontification. * vc-bzr.el (vc-bzr-log-view-mode): Match dot in revision number. Fix fontification for the [merge] label. --- lisp/ChangeLog | 6 ++++++ lisp/vc-bzr.el | 4 ++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6aefbd112df..bb86c82846d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2009-12-09 Dan Nicolaescu + + Fix short log parsing and fontification. + * vc-bzr.el (vc-bzr-log-view-mode): Match dot in revision number. + Fix fontification for the [merge] label. + 2009-12-09 Vivek Dasmohapatra Drop some properties to avoid surprises. diff --git a/lisp/vc-bzr.el b/lisp/vc-bzr.el index 13a3eb12b16..ae6117d1891 100644 --- a/lisp/vc-bzr.el +++ b/lisp/vc-bzr.el @@ -462,7 +462,7 @@ REV non-nil gets an error." (set (make-local-variable 'log-view-file-re) "\\`a\\`") (set (make-local-variable 'log-view-message-re) (if vc-short-log - "^ +\\([0-9]+\\) \\(.*?\\)[ \t]+\\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\}\\)\\( \\[merge\\]\\)?" + "^ +\\([0-9.]+\\) \\(.*?\\)[ \t]+\\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\}\\)\\( \\[merge\\]\\)?" "^ *\\(?:revno: \\([0-9.]+\\)\\|merged: .+\\)")) (set (make-local-variable 'log-view-font-lock-keywords) ;; log-view-font-lock-keywords is careful to use the buffer-local @@ -472,7 +472,7 @@ REV non-nil gets an error." (1 'log-view-message-face) (2 'change-log-name) (3 'change-log-date) - (4 'change-log-list)))) + (4 'change-log-list nil lax)))) (append `((,log-view-message-re . 'log-view-message-face)) ;; log-view-font-lock-keywords '(("^ *committer: \ -- 2.39.5