From: Philipp Stephani <phst@google.com>
Date: Fri, 14 Jan 2022 20:02:08 +0000 (+0100)
Subject: * lisp/indent.el (indent-for-tab-command): Use 'eq' for symbols.
X-Git-Tag: emacs-29.0.90~3047
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ec52d2775a9dc36ebac7bac9fc4bbfe42302fa80;p=emacs.git

* lisp/indent.el (indent-for-tab-command): Use 'eq' for symbols.
---

diff --git a/lisp/indent.el b/lisp/indent.el
index ad6fd899c55..4e16d30ac92 100644
--- a/lisp/indent.el
+++ b/lisp/indent.el
@@ -186,16 +186,16 @@ prefix argument is ignored."
              (eql old-tick (buffer-chars-modified-tick))
              (or (null tab-first-completion)
                  (eq last-command this-command)
-                 (and (equal tab-first-completion 'eol)
+                 (and (eq tab-first-completion 'eol)
                       (eolp))
-                 (and (member tab-first-completion
-                              '(word word-or-paren word-or-paren-or-punct))
+                 (and (memq tab-first-completion
+                            '(word word-or-paren word-or-paren-or-punct))
                       (not (eql 2 syn)))
-                 (and (member tab-first-completion
-                              '(word-or-paren word-or-paren-or-punct))
+                 (and (memq tab-first-completion
+                            '(word-or-paren word-or-paren-or-punct))
                       (not (or (eql 4 syn)
                                (eql 5 syn))))
-                 (and (equal tab-first-completion 'word-or-paren-or-punct)
+                 (and (eq tab-first-completion 'word-or-paren-or-punct)
                       (not (eql 1 syn)))))
         (completion-at-point))