[elpa] externals/elisa 8251bfb4ed 05/98: Fix async commands

[ELPA Syncer]

branch: externals/elisa
commit 8251bfb4ed0ea4de0177cb798d11e0347de8f42d
Author: Sergey Kostyaev <kostyaev.sergey2@wb.ru>
Commit: Sergey Kostyaev <kostyaev.sergey2@wb.ru>

    Fix async commands
---
 elisa.el | 27 +++++++++++++++------------
 1 file changed, 15 insertions(+), 12 deletions(-)

diff --git a/elisa.el b/elisa.el
index 246279333e..978933f068 100644
--- a/elisa.el
+++ b/elisa.el
@@ -256,10 +256,11 @@
   "Parse builtin manuals asyncronously."
   (interactive)
   (message "Begin parsing builtin manuals.")
-  (async-start (lambda ()
-                (package-initialize)
-                (require 'elisa)
-                (elisa-parse-builtin-manuals))
+  (async-start `(lambda ()
+                 ,(async-inject-variables "elisa-embeddings-provider")
+                 (package-initialize)
+                 (require 'elisa)
+                 (elisa-parse-builtin-manuals))
               (lambda (_)
                 (message "Builtin manuals parsing done."))))
 
@@ -268,10 +269,11 @@
   "Parse external manuals asyncronously."
   (interactive)
   (message "Begin parsing external manuals.")
-  (async-start (lambda ()
-                (package-initialize)
-                (require 'elisa)
-                (elisa-parse-external-manuals))
+  (async-start `(lambda ()
+                 ,(async-inject-variables "elisa-embeddings-provider")
+                 (package-initialize)
+                 (require 'elisa)
+                 (elisa-parse-external-manuals))
               (lambda (_)
                 (message "External manuals parsing done."))))
 
@@ -280,10 +282,11 @@
   "Parse all manuals asyncronously."
   (interactive)
   (message "Begin parsing manuals.")
-  (async-start (lambda ()
-                (package-initialize)
-                (require 'elisa)
-                (elisa-parse-all-manuals))
+  (async-start `(lambda ()
+                 ,(async-inject-variables "elisa-embeddings-provider")
+                 (package-initialize)
+                 (require 'elisa)
+                 (elisa-parse-all-manuals))
               (lambda (_)
                 (message "Manuals parsing done."))))