[Emacspeak] Vertico 0.28 Patch

[Hunter Jozwiak <hunter.t.joz@xxxxxxxxxxx>]

Howdy ya'all,

Here is a patch for Vertico 0.28. If you attempt to use Emacspeak with this version, it will explode because verticoâ??allow-prompt-selection-p was renamed.

Thanks,

Hunter

From 581194b70a4ffafc8e517a6a5a83a0a964a61cff Mon Sep 17 00:00:00 2001
From: Hunter Jozwiak <hunter.t.joz@xxxxxxxxxxx>
Date: Sat, 5 Nov 2022 21:25:34 -0400
Subject: [PATCH] Fix: make Emacspeak work with vertico 0.28.

vertico--allow-prompt-selection-p was renamed to vertico--allow-prompt-p.
---
 lisp/emacspeak-vertico.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/emacspeak-vertico.el b/lisp/emacspeak-vertico.el
index 68abbd241..3b4acd42c 100644
--- a/lisp/emacspeak-vertico.el
+++ b/lisp/emacspeak-vertico.el
@@ -61,7 +61,7 @@
 ;;}}}
 ;;{{{
 (declare-function 'vertico--candidate "vertico.el" (&optional hl))
-(declare-function 'vertico--allow-prompt-selection-p "vertico.el" ())
+(declare-function 'vertico--allow-prompt-p "vertico.el" ())
 ;;}}}
 ;;{{{ Advice interactive commands
 
@@ -93,7 +93,7 @@
                 (and (not (equal vertico--index -1))
                      (equal emacspeak-vertico--prev-index -1)))
         (push "candidate" to-speak)))
-    (when (and (not (vertico--allow-prompt-selection-p))
+    (when (and (not (vertico--allow-prompt-p))
                (equal emacspeak-vertico--prev-candidate nil))
       (push "first candidate" to-speak))
     (when to-speak
-- 
2.38.1

Attachment: signature.asc
Description: PGP signature