1257 |
font-lock-syntactic-keywords))) |
font-lock-syntactic-keywords))) |
1258 |
;; Get down to business. |
;; Get down to business. |
1259 |
(let ((case-fold-search font-lock-keywords-case-fold-search) |
(let ((case-fold-search font-lock-keywords-case-fold-search) |
1260 |
(keywords (cdr font-lock-syntactic-keywords)) |
(keywords (cddr font-lock-syntactic-keywords)) |
1261 |
keyword matcher highlights) |
keyword matcher highlights) |
1262 |
(while keywords |
(while keywords |
1263 |
;; Find an occurrence of `matcher' from `start' to `end'. |
;; Find an occurrence of `matcher' from `start' to `end'. |