[elpa] externals/mct 771fb8b3cb 54/64: Make in-region prev motion work at all times

[ELPA Syncer]

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

    Make in-region prev motion work at all times
---
 mct.el | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/mct.el b/mct.el
index 5956366f7f..0c5e46b1d5 100644
--- a/mct.el
+++ b/mct.el
@@ -1175,12 +1175,11 @@ is meant for the case of completion in region (i.e. not 
in the
 minibuffer)."
   (interactive nil mct-region-mode)
   (let ((count (if (natnump arg) arg 1)))
-    (when (mct--region-p)
-      (cond
-       ((mct--top-of-completions-p count)
-        (minibuffer-hide-completions))
-       (t
-        (mct--previous-completion count))))))
+    (cond
+     ((mct--top-of-completions-p count)
+      (minibuffer-hide-completions))
+     (t
+      (mct--previous-completion count)))))
 
 (defvar mct-region-completion-list-mode-map
   (let ((map (make-sparse-keymap)))