[elpa] externals/aggressive-completion c87ce0d: Fix a (wrong-type-argument number-or-marker-p tab) error; release 1.3

[Tassilo Horn]

branch: externals/aggressive-completion
commit c87ce0d0d84e22f89cc628378c9807e534ac4f9b
Author: Tassilo Horn <tsdh@gnu.org>
Commit: Tassilo Horn <tsdh@gnu.org>

    Fix a (wrong-type-argument number-or-marker-p tab) error; release 1.3
---
 aggressive-completion.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/aggressive-completion.el b/aggressive-completion.el
index e94476e..890c6cd 100644
--- a/aggressive-completion.el
+++ b/aggressive-completion.el
@@ -6,7 +6,7 @@
 ;; Maintainer: Tassilo Horn <tsdh@gnu.org>
 ;; Keywords: minibuffer completion
 ;; Package-Requires: ((emacs "27.1"))
-;; Version: 1.2
+;; Version: 1.3
 
 ;; This file is part of GNU Emacs.
 
@@ -77,6 +77,7 @@ If nil, only show the completion help."
 
 (defun aggressive-completion--do ()
   "Perform aggressive completion."
+  (message "last-command: %S" last-command)
   (when (window-minibuffer-p)
     (let* ((completions (completion-all-sorted-completions))
            ;; Don't ding if there are no completions, etc.
@@ -103,7 +104,8 @@ If nil, only show the completion help."
               ;; Only show the completion help.  This slightly awkward
               ;; condition ensures we still can repeatedly hit TAB to scroll
               ;; through the list of completions.
-              (unless (and (= last-command-event ?\t)
+              (unless (and (memq last-command
+                                 '(completion-at-point minibuffer-complete))
                            (window-live-p
                             (get-buffer-window "*Completions*"))
                            (with-current-buffer "*Completions*"