[elpa] externals/transient 79d1426de1: transient-prompt(lisp-variable): Fallback to generic prompt

[Jonas Bernoulli]

branch: externals/transient
commit 79d1426de173312bd6a3091731675bb010d804ec
Author: Psionik K <73710933+psionic-k@users.noreply.github.com>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    transient-prompt(lisp-variable): Fallback to generic prompt
    
    Teach `transient-prompt' to fall back to a generic prompt for
    `transient-lisp-variable'.  If a prompt is explicitly provided, then
    continue to use that.
    
    (The method for `transient-infix', which is currently being used for
    all other types, already falls back to a generic prompt in most cases,
    but may in some cases use a prompt that warns that a prompt should be
    given explicitly.)
    
    Signed-off-by: Psionik K <73710933+psionic-k@users.noreply.github.com>
---
 lisp/transient.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index 23b6039d54..ab51e6c37a 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -4124,7 +4124,10 @@ we stop there."
               'face 'transient-value))
 
 (cl-defmethod transient-prompt ((obj transient-lisp-variable))
-  (format "Set %s: " (oref obj variable)))
+  (if (and (slot-boundp obj 'prompt)
+           (oref obj prompt))
+      (cl-call-next-method obj)
+    (format "Set %s: " (oref obj variable))))
 
 (defun transient-lisp-variable--reader (prompt initial-input _history)
   (read--expression prompt initial-input))