405 |
The regexp is highlighted with FACE." |
The regexp is highlighted with FACE." |
406 |
(unless (listp keywords-list) |
(unless (listp keywords-list) |
407 |
(error "Keywords argument must be a list of strings")) |
(error "Keywords argument must be a list of strings")) |
408 |
(list (concat prefix "\\<" |
(list (concat prefix "\\_<" |
409 |
;; Use an optimized regexp. |
;; Use an optimized regexp. |
410 |
(regexp-opt keywords-list t) |
(regexp-opt keywords-list t) |
411 |
"\\>" suffix) |
"\\_>" suffix) |
412 |
1 |
1 |
413 |
face)) |
face)) |
414 |
|
|