diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2022-12-16 12:17:33 +0100 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2022-12-16 19:18:34 +0100 |
| commit | 6a390fd42ec4ef97d637899fc93f34ea65639e3c (patch) | |
| tree | ab337c58990d9b187a64751309b761488266bbe5 /lisp/emulation/viper-cmd.el | |
| parent | 6283b9233459d74f95e9b0300f025a49f9674fb9 (diff) | |
| download | emacs-6a390fd42ec4ef97d637899fc93f34ea65639e3c.tar.gz emacs-6a390fd42ec4ef97d637899fc93f34ea65639e3c.tar.bz2 emacs-6a390fd42ec4ef97d637899fc93f34ea65639e3c.zip | |
Use equal and member instead of eq and memq
* lisp/cedet/semantic/complete.el (semantic-displayer-show-request):
* lisp/descr-text.el (describe-char-categories):
* lisp/mh-e/mh-identity.el (mh-select-identity):
* lisp/transient.el (transient--delay-post-command)
(transient--post-command):
* lisp/vc/vc-git.el (vc-git-create-tag):
* test/lisp/emacs-lisp/cl-lib-tests.el
(cl-lib-nth-value-test-multiple-values):
* lisp/emulation/viper-cmd.el (viper-preserve-cursor-color):
Use `equal` instead of `eq` and `member` instead of `memq` where
the comparison is with literals without guaranteed identity.
In some cases this change corrects evident bugs, in others it is
mostly cosmetic.
Diffstat (limited to 'lisp/emulation/viper-cmd.el')
| -rw-r--r-- | lisp/emulation/viper-cmd.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emulation/viper-cmd.el b/lisp/emulation/viper-cmd.el index 26793989d05..3b3caaf3e3c 100644 --- a/lisp/emulation/viper-cmd.el +++ b/lisp/emulation/viper-cmd.el @@ -194,9 +194,9 @@ viper-delete-backward-char viper-join-lines viper-delete-char)) - (memq (viper-event-key last-command-event) - '(up down left right (meta f) (meta b) - (control n) (control p) (control f) (control b))))) + (member (viper-event-key last-command-event) + '(up down left right (meta f) (meta b) + (control n) (control p) (control f) (control b))))) (defsubst viper-insert-state-pre-command-sentinel () (or (viper-preserve-cursor-color) |