[elpa] externals/mct d1f6fe3a6c 5/8: Rename mct--active-p to mct--minibuffer-p

[ELPA Syncer]

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

    Rename mct--active-p to mct--minibuffer-p
---
 mct.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/mct.el b/mct.el
index e784f0f986..52563bd336 100644
--- a/mct.el
+++ b/mct.el
@@ -312,7 +312,7 @@ Meant to be added to `after-change-functions'."
 (defvar-local mct--active nil
   "Minibuffer local variable, t if Mct is active.")
 
-(defun mct--active-p ()
+(defun mct--minibuffer-p ()
   "Return t if Mct is active."
   (when-let* ((win (active-minibuffer-window))
               (buf (window-buffer win)))
@@ -328,7 +328,7 @@ Meant to be added to `after-change-functions'."
   "Prepare advice around `display-completion-list'.
 Apply APP by first let binding the `completions-format' to
 `mct-completions-format'."
-  (if (mct--active-p)
+  (if (mct--minibuffer-p)
       (let ((completions-format mct-completions-format))
         (apply app)
         (mct--fit-completions-window))
@@ -1099,7 +1099,7 @@ region.")
 
 (defun mct--setup-completion-list ()
   "Set up the completion-list for Mct."
-  (when (mct--active-p)
+  (when (mct--minibuffer-p)
     (setq-local completion-show-help nil
                 truncate-lines t)
     (mct--setup-clean-completions)