emacs-devel
[Top][All Lists]
Advanced

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

trivial bug of font-lock in Change Log mode.


From: Kenichi Handa
Subject: trivial bug of font-lock in Change Log mode.
Date: Thu, 26 May 2005 10:00:39 +0900
User-agent: SEMI/1.14.3 (Ushinoya) FLIM/1.14.2 (Yagi-Nishiguchi) APEL/10.2 Emacs/22.0.50 (i686-pc-linux-gnu) MULE/5.0 (SAKAKI)

For instance, emacs/src/ChangeLog has this line near the
end.

See ChangeLog.9 for earlier changes.

When I visit this file and turn on font-lock mode, "See
Change" (the first 10 characters) gets change-log-data-face.

It seems that the attached change fix the problem, but, it
may fail if there are some other old style than these two:

Wed Aug 21 03:51:42 1996
2005-05-16

Could someone verify it?

---
Kenichi Handa
address@hidden


*** add-log.el  12 May 2005 20:34:26 +0900      1.161
--- add-log.el  26 May 2005 09:56:08 +0900      
***************
*** 217,223 ****
  (defvar change-log-font-lock-keywords
    '(;;
      ;; Date lines, new and old styles.
!     ("^\\sw.........[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
--- 217,223 ----
  (defvar change-log-font-lock-keywords
    '(;;
      ;; Date lines, new and old styles.
!     
("^\\([1-9][0-9][0-9][0-9]-[0-9-]+\\|\\(Sun\\|Mon\\|Tue\\|Wed\\|Thu\\|Fri\\|Sat\\|Sun\\)
 \\sw\\sw\\sw\\)[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


---
Kenichi Handa
address@hidden




reply via email to

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