Commit f5672b24 authored by Mattias Engdegård's avatar Mattias Engdegård

Don't use the return value of 'push'

Although 'push' returns the modified list, it isn't actually
documented to do so, so don't rely on it.

* lisp/emacs-lisp/rx.el (rx--translate-any): Add progn.
parent 23053770
Pipeline #4236 failed with stage
in 55 minutes and 57 seconds
......@@ -378,7 +378,7 @@ If NEGATED, negate the sense."
(let ((class (cdr (assq arg rx--char-classes))))
(and class
(or (memq class classes)
(push class classes))))))
(progn (push class classes) t))))))
(t (error "Invalid rx `any' argument: %s" arg))))
(let ((items
;; Translate strings and conses into nonoverlapping intervals,
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment