[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master ec52d2775a 3/3: * lisp/indent.el (indent-for-tab-command): Use 'e
From: |
Philipp Stephani |
Subject: |
master ec52d2775a 3/3: * lisp/indent.el (indent-for-tab-command): Use 'eq' for symbols. |
Date: |
Fri, 14 Jan 2022 15:03:16 -0500 (EST) |
branch: master
commit ec52d2775a9dc36ebac7bac9fc4bbfe42302fa80
Author: Philipp Stephani <phst@google.com>
Commit: Philipp Stephani <phst@google.com>
* lisp/indent.el (indent-for-tab-command): Use 'eq' for symbols.
---
lisp/indent.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/lisp/indent.el b/lisp/indent.el
index ad6fd899c5..4e16d30ac9 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))