# HG changeset patch
# User stephent
# Date 1033656029 0
# Node ID 089f79dae3ab7ccb6ccd1aa0cb523a4d99e667fe
# Parent  6294b2d3cb3f12a26bef7430bb1d76bfd0452df4
[xemacs-hg @ 2002-10-03 14:40:24 by stephent]
improve docstring <87smznk2tm.fsf@tleepslib.sk.tsukuba.ac.jp>

diff -r 6294b2d3cb3f -r 089f79dae3ab lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Oct 03 13:54:15 2002 +0000
+++ b/lisp/ChangeLog	Thu Oct 03 14:40:29 2002 +0000
@@ -1,3 +1,7 @@
+2002-10-03  Stephen J. Turnbull  <stephen@xemacs.org>
+
+	* font-lock.el (font-lock-compile-keywords): Improve docstring.
+
 2002-09-22  Ville Skyttä  <ville.skytta@xemacs.org>
 
 	* files.el (auto-mode-alist): Move entries for modes in packages
diff -r 6294b2d3cb3f -r 089f79dae3ab lisp/font-lock.el
--- a/lisp/font-lock.el	Thu Oct 03 13:54:15 2002 +0000
+++ b/lisp/font-lock.el	Thu Oct 03 14:40:29 2002 +0000
@@ -1714,9 +1714,8 @@
 ;; Various functions.
 
 (defun font-lock-compile-keywords (keywords)
-  "Compile KEYWORDS into the form (t KEYWORD ...).
-Here KEYWORD is of the form (MATCHER HIGHLIGHT ...) as shown in the
-`font-lock-keywords' doc string."
+  "Compile KEYWORDS (a list) and return the list of compiled keywords.
+Each keyword has the form (MATCHER HIGHLIGHT ...).  See `font-lock-keywords'."
   (if (eq (car-safe keywords) t)
       keywords
     (cons t (mapcar 'font-lock-compile-keyword keywords))))