diff options
Diffstat (limited to 'lisp/emacs-lisp/re-builder.el')
| -rw-r--r-- | lisp/emacs-lisp/re-builder.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/emacs-lisp/re-builder.el b/lisp/emacs-lisp/re-builder.el index 961d26a7212..1054f1453bc 100644 --- a/lisp/emacs-lisp/re-builder.el +++ b/lisp/emacs-lisp/re-builder.el @@ -816,13 +816,12 @@ If SUBEXP is non-nil mark only the corresponding sub-expressions." (require 'rx) (defconst reb-rx-font-lock-keywords - (let ((constituents (mapcar (lambda (rec) - (symbol-name (car rec))) - rx-constituents)) - (syntax (mapcar (lambda (rec) (symbol-name (car rec))) rx-syntax)) + (let ((constituents (mapcar #'symbol-name rx--builtin-forms)) + (syntax (mapcar (lambda (rec) (symbol-name (car rec))) + rx--syntax-codes)) (categories (mapcar (lambda (rec) (symbol-name (car rec))) - rx-categories))) + rx--categories))) `( (,(concat "(" (regexp-opt (list "rx-to-string") t) "[[:space:]]") (1 font-lock-function-name-face)) |