[elpa] externals/kiwix 7dd18df6f8 03/15: kiwix search keywords async completion read with vertico and consult support

[ELPA Syncer]

branch: externals/kiwix
commit 7dd18df6f88b4ac1a4c4251ac6d339751e28f046
Author: stardiviner <numbchild@gmail.com>
Commit: stardiviner <numbchild@gmail.com>

    kiwix search keywords async completion read with vertico and consult support
---
 kiwix.el | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/kiwix.el b/kiwix.el
index caed89865f..1086765a77 100644
--- a/kiwix.el
+++ b/kiwix.el
@@ -116,6 +116,7 @@
   :type 'string)
 
 (defcustom kiwix-default-completing-read (cond
+                                          ((fboundp 'vertico--all-completions) 
'vertico)
                                           ((fboundp 'consult--read) 'selectrum)
                                           ((fboundp 'ivy-read) 'ivy)
                                           ((fboundp 'helm) 'helm)
@@ -333,6 +334,15 @@ list and return a list result."
 (defun kiwix--ajax-select-available-hints (zim-library)
   "AJAX search hints on the selected library and select one term from 
available hints."
   (pcase kiwix-default-completing-read
+    ('vertico
+     (require 'vertico)
+     (require 'consult)
+     (consult--read
+      (lambda (input)
+        (apply #'kiwix--ajax-search-hints
+               input `(,zim-library)))
+      :prompt "Kiwix related entries: "
+      :require-match nil))
     ('selectrum
      (require 'selectrum)
      (require 'consult)