[elpa] externals/mct 5acda65160 1/5: Fix regression with motions that take numeric arg

[ELPA Syncer]

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

    Fix regression with motions that take numeric arg
    
    Thanks to Z.Du for pointing out the problem in issue 17:
    <https://gitlab.com/protesilaos/mct/-/issues/17>.
---
 mct.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mct.el b/mct.el
index 6ccb644d7c..c9dd9469d9 100644
--- a/mct.el
+++ b/mct.el
@@ -699,7 +699,7 @@ This performs a regular motion for optional ARG candidates, 
but
 when point can no longer move in that direction it switches to
 the minibuffer."
   (interactive "p" mct-minibuffer-mode)
-  (let ((count (or (abs arg) 1)))
+  (let ((count (if (natnump arg) arg 1)))
     (if (mct--top-of-completions-p count)
         (mct-focus-minibuffer)
       (mct--previous-completion count))))
@@ -1204,7 +1204,7 @@ This is a counterpart of 
`mct-previous-completion-or-mini' that
 is meant for the case of completion in region (i.e. not in the
 minibuffer)."
   (interactive nil mct-region-mode)
-  (let ((count (or (abs arg) 1)))
+  (let ((count (if (natnump arg) arg 1)))
     (cond
      ((mct--top-of-completions-p count)
       (minibuffer-hide-completions))