emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r104237: add-log font-lock fix for mu


From: Glenn Morris
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r104237: add-log font-lock fix for mutilple authors (bug#8644)
Date: Sat, 14 May 2011 16:58:25 -0700
User-agent: Bazaar (2.3.1)

------------------------------------------------------------
revno: 104237
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Sat 2011-05-14 16:58:25 -0700
message:
  add-log font-lock fix for mutilple authors (bug#8644)
  
  * lisp/vc/add-log.el (change-log-font-lock-keywords): Also handle multiple
  author lines with leading tabs.
modified:
  lisp/ChangeLog
  lisp/vc/add-log.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-05-14 23:27:09 +0000
+++ b/lisp/ChangeLog    2011-05-14 23:58:25 +0000
@@ -2,6 +2,8 @@
 
        * vc/add-log.el (add-change-log-entry): Don't start adding a new entry
        in the middle of an existing one with multiple authors.  (Bug#8645)
+       (change-log-font-lock-keywords): Also handle multiple author lines
+       with leading tabs.  (Bug#8644)
 
        * calendar/appt.el (appt-check): Rename some local variables.
        Some simplification/reordering.

=== modified file 'lisp/vc/add-log.el'
--- a/lisp/vc/add-log.el        2011-05-14 23:27:09 +0000
+++ b/lisp/vc/add-log.el        2011-05-14 23:58:25 +0000
@@ -241,7 +241,7 @@
     ;; wrongly with a non-date line existing as a random note.  In
     ;; addition, using any kind of fixed setting like this doesn't
     ;; work if a user customizes add-log-time-format.
-    ("^[0-9-]+ +\\|^ 
\\{11,\\}\\|^\\(Sun\\|Mon\\|Tue\\|Wed\\|Thu\\|Fri\\|Sat\\) [A-z][a-z][a-z] 
[0-9:+ ]+"
+    ("^[0-9-]+ +\\|^ \\{11,\\}\\|^\t 
\\{3,\\}\\|^\\(Sun\\|Mon\\|Tue\\|Wed\\|Thu\\|Fri\\|Sat\\) [A-z][a-z][a-z] 
[0-9:+ ]+"
      (0 'change-log-date-face)
      ;; Name and e-mail; some people put e-mail in parens, not angles.
      ("\\([^<(]+?\\)[ \t]*[(<]\\(address@hidden)[>)]" nil nil


reply via email to

[Prev in Thread] Current Thread [Next in Thread]