[elpa] externals/hyperbole c8bb449 1/2: hui:htype-help - Allow '*' as choice for helm/ivy completion

[ELPA Syncer]

branch: externals/hyperbole
commit c8bb449280d34fe8f5b2f18fb0a3ca4e6e0f2afb
Author: Bob Weiner <rsw@gnu.org>
Commit: Bob Weiner <rsw@gnu.org>

    hui:htype-help - Allow '*' as choice for helm/ivy completion
---
 hui.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/hui.el b/hui.el
index f2c6a3e..915bb30 100644
--- a/hui.el
+++ b/hui.el
@@ -1054,16 +1054,16 @@ Optional NO-SORT means display in decreasing priority 
order (natural order)."
              (names (htype:names htype-sym))
              (term (hargs:read-match
                     (concat (capitalize tstr)
-                            (format " to describe (RET for all%s): "
+                            (format " to describe (RET or '*' for all%s): "
                                     (if (eq htype-sym 'ibtypes)
                                         " in priority order"
                                       "")))
-                    (mapcar 'list (cons "" names))
+                    (mapcar 'list (append '("" "*") names))
                     nil t nil htype-sym))
              nm-list
              doc-list)
         (setq nm-list
-              (if (string-equal term "")
+              (if (member term '("" "*"))
                   (let ((type-names
                           (mapcar (lambda (nm) (concat tprefix nm))
                                   names)))