Fixed syntax highlighting in lisp/add-log.el.

3 files changed, 13 insertions, 6 deletions

diff --git a/etc/ChangeLog b/etc/ChangeLog
index 8d7a961032..9302885ac3 100644
--- a/etc/ChangeLog
+++ b/etc/ChangeLog
@@ -9,10 +9,10 @@
 2005-04-01  Marcelo Toledo  <[email protected]>
 
         * TUTORIAL.pt_BR, TUTORIAL.cn, TUTORIAL.cs, TUTORIAL.de,
-        TUTORIAL.es, TUTORIAL.fr, TUTORIAL.it, TUTORIAL.ja, TUTORIAL.ko,
-        TUTORIAL.pl, TUTORIAL.pt_BR, TUTORIAL.ro, TUTORIAL.ru,
-        TUTORIAL.sk, TUTORIAL.sl, TUTORIAL.th, TUTORIAL.zh: Fix title
-        line.        
+        * TUTORIAL.es, TUTORIAL.fr, TUTORIAL.it, TUTORIAL.ja, TUTORIAL.ko,
+        * TUTORIAL.pl, TUTORIAL.pt_BR, TUTORIAL.ro, TUTORIAL.ru,
+        * TUTORIAL.sk, TUTORIAL.sl, TUTORIAL.th, TUTORIAL.zh: Fix title
+        line.
         
         * TUTORIAL.bg: Fix title line; Applied TUTORIAL changes in
         2005-02-08T14:20:[email protected], "Emacs" is not transliterated to cyrillic anymore;
@@ -21,7 +21,6 @@
         * TUTORIAL.sv: Sync some other changes with the TUTORIAL version
         2005-04-01T00:31:[email protected] by Mats Lidell <[email protected]>.
 
-
 2005-04-01  Lute Kamstra  <[email protected]>
 
 	* TUTORIAL.nl: Fix title line.
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3ad59c9ed0..4996e0a33d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2005-04-03  Marcelo Toledo  <[email protected]>
+
+        * add-log.el (change-log-font-lock-keywords): The manual
+        describing a Change Log entry, says: (...) "Aside from these
+        header lines, every line in the change log starts with a space or
+        a tab.". The font-lock was not highlighting lines started with
+        spaces, added support for it.
+
 2005-04-03  Roland Winkler  <[email protected]>
 
 	* textmodes/bibtex.el (bibtex-url): Use format to generate the url.
diff --git a/lisp/add-log.el b/lisp/add-log.el
index 7706a69775..8d4c741566 100644
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -225,7 +225,7 @@ Note: The search is conducted only within 10%, at the beginning of the file."
       (2 'change-log-email-face)))
     ;;
     ;; File names.
-    ("^\t\\* \\([^ ,:([\n]+\\)"
+    ("^\\(?: +\\|\t\\)\\* \\([^ ,:([\n]+\\)"
      (1 'change-log-file-face)
      ;; Possibly further names in a list:
      ("\\=, \\([^ ,:([\n]+\\)" nil nil (1 'change-log-file-face))