changeset 7859:1d1693211560

(Info-fontify-node): Require some whitespace after *Note.
author Richard M. Stallman <rms@gnu.org>
date Sun, 12 Jun 1994 14:37:21 +0000
parents 41f30d92485e
children 26a1d7b2670b
files lisp/info.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info.el	Sun Jun 12 12:57:42 1994 +0000
+++ b/lisp/info.el	Sun Jun 12 14:37:21 1994 +0000
@@ -1575,7 +1575,7 @@
 	      (put-text-property (match-beginning 1) (match-end 1)
 				 'mouse-face 'highlight))))
       (goto-char (point-min))
-      (while (re-search-forward "\\*Note[ \n\t]*\\([^:]*\\):" nil t)
+      (while (re-search-forward "\\*Note[ \n\t]+\\([^:]*\\):" nil t)
 	(if (= (char-after (1- (match-beginning 0))) ?\") ; hack
 	    nil
 	  (put-text-property (match-beginning 1) (match-end 1)