emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/mct 01edefb 14/70: Use memq instead of member where app


From: ELPA Syncer
Subject: [elpa] externals/mct 01edefb 14/70: Use memq instead of member where applicable
Date: Thu, 11 Nov 2021 03:57:42 -0500 (EST)

branch: externals/mct
commit 01edefb5a6ba41f5a191400fa2e21ae2222a43f8
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Use memq instead of member where applicable
---
 mct.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/mct.el b/mct.el
index acbbfaf..09e0f10 100644
--- a/mct.el
+++ b/mct.el
@@ -277,14 +277,14 @@ Meant to be added to `after-change-functions'."
 (defun mct--setup-completions ()
   "Set up the completions' buffer."
   (cond
-   ((member this-command mct-completion-passlist)
+   ((memq this-command mct-completion-passlist)
     (setq-local mct-minimum-input 0)
     (setq-local mct-live-update-delay 0)
     (mct--show-completions)
     (add-hook 'after-change-functions #'mct--live-completions nil t))
    ((null mct-live-completion))
-   ((unless (member this-command mct-completion-blocklist)
-      (add-hook 'after-change-functions #'mct--live-completions-timer nil 
t)))))
+   ((not (memq this-command mct-completion-blocklist))
+    (add-hook 'after-change-functions #'mct--live-completions-timer nil t))))
 
 ;;;;; Alternating backgrounds (else "stripes")
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]