(font-lock-fontify-syntactic-keywords-region):

More changes to go with previous change.

diff --git a/lisp/font-lock.el b/lisp/font-lock.el
index 033bf20..ce2548c 100644 (file)
--- a/lisp/font-lock.el
+++ b/lisp/font-lock.el
@@ -1257,7 +1257,7 @@ START should be at the beginning of a line."
                                        font-lock-syntactic-keywords)))
   ;; Get down to business.
   (let ((case-fold-search font-lock-keywords-case-fold-search)
-       (keywords (cdr font-lock-syntactic-keywords))
+       (keywords (cddr font-lock-syntactic-keywords))
        keyword matcher highlights)
     (while keywords
       ;; Find an occurrence of `matcher' from `start' to `end'.