summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/rx.el10
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/rx.el b/lisp/emacs-lisp/rx.el
index 07ede57d393..182e48d7856 100644
--- a/lisp/emacs-lisp/rx.el
+++ b/lisp/emacs-lisp/rx.el
@@ -1112,10 +1112,12 @@ can expand to any number of values."
;; Declare Lisp indentation rules for constructs that take 1 or 2
;; parameters before a body of RX forms.
-(dolist (sym '( group-n submatch-n = >=))
- (put sym 'lisp-indent-function 1))
-(dolist (sym '( ** repeat))
- (put sym 'lisp-indent-function 2))
+;; (`>=' and `=' are omitted because they are more likely to be used
+;; as Lisp functions than RX constructs.)
+(put 'group-n 'lisp-indent-function 1)
+(put 'submatch-n 'lisp-indent-function 1)
+(put '** 'lisp-indent-function 2)
+(put 'repeat 'lisp-indent-function 2)
(defun rx--translate (item)