[elpa] externals/mct 4b05edf129 1/2: Reuse helper function to avoid repetition in pass/block predicates

[ELPA Syncer]

branch: externals/mct
commit 4b05edf129f8a1455d6b40fe597e150c9921c507
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Reuse helper function to avoid repetition in pass/block predicates
---
 mct.el | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/mct.el b/mct.el
index b743087c0a..3cd547b5e3 100644
--- a/mct.el
+++ b/mct.el
@@ -266,13 +266,11 @@ affairs."
 
 (defun mct--passlist-p ()
   "Return non-nil if symbol is in the `mct-completion-passlist'."
-  (or (memq (mct--this-command) mct-completion-passlist)
-      (memq (mct--completion-category) mct-completion-passlist)))
+  (mct--symbol-in-list mct-completion-passlist))
 
 (defun mct--blocklist-p ()
   "Return non-nil if symbol is in the `mct-completion-blocklist'."
-  (or (memq (mct--this-command) mct-completion-blocklist)
-      (memq (mct--completion-category) mct-completion-blocklist)))
+  (mct--symbol-in-list mct-completion-blocklist))
 
 ;; Normally we would also include `imenu', but it has its own defcustom
 ;; for popping up the Completions eagerly...  Let's not interfere with