fix(vertico): void-function consult--async-split-style error

Amend: ffc5c60
Fix: doomemacs#8282
Ref: minad/consult@bdc4a9724c89

Author: hlissner

modules/completion/vertico/autoload/vertico.el

@@ -41,7 +41,7 @@
     ;; Change the split style if the initial query contains the separator.
     (when query
       (cl-destructuring-bind (&key type separator initial _function)
-          (consult--async-split-style)
+          (alist-get consult-async-split-style consult-async-split-styles-alist)
         (pcase type
           (`separator
            (replace-regexp-in-string (regexp-quote (char-to-string separator))