diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2022-12-16 19:25:45 +0200 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2022-12-16 19:25:45 +0200 |
| commit | 8e42e20ed7f3c243542acf3ea1cd34e38e36aace (patch) | |
| tree | 0d3393990e9f70e050a44a9b46317e6d10308ac2 /lisp/transient.el | |
| parent | f4b430140f0866f98bbf18b7094348dc64032813 (diff) | |
| download | emacs-8e42e20ed7f3c243542acf3ea1cd34e38e36aace.tar.gz emacs-8e42e20ed7f3c243542acf3ea1cd34e38e36aace.tar.bz2 emacs-8e42e20ed7f3c243542acf3ea1cd34e38e36aace.zip | |
Revert "Use equal and member instead of eq and memq"
This reverts commit f4b430140f0866f98bbf18b7094348dc64032813.
Please don't install anything on the release branch that is not
strictly necessary fro Emacs 29.
Diffstat (limited to 'lisp/transient.el')
| -rw-r--r-- | lisp/transient.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/transient.el b/lisp/transient.el index 9656ab9854a..0919c2c3ef0 100644 --- a/lisp/transient.el +++ b/lisp/transient.el @@ -2203,7 +2203,7 @@ value. Otherwise return CHILDREN as is." (unless abort-only (setq post-command (lambda () "@transient--delay-post-command" - (let ((act (and (not (equal (this-command-keys-vector) [])) + (let ((act (and (not (eq (this-command-keys-vector) [])) (or (eq this-command command) ;; `execute-extended-command' was ;; used to call another command @@ -2236,7 +2236,7 @@ value. Otherwise return CHILDREN as is." (transient--debug 'post-command) (transient--with-emergency-exit (cond - ((and (equal (this-command-keys-vector) []) + ((and (eq (this-command-keys-vector) []) (= (minibuffer-depth) (1+ transient--minibuffer-depth))) (transient--suspend-override) |