From de5544e8b80aaf304e70b56c8f1432a02bb94610 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 3 Jul 2005 16:10:07 +0000 Subject: [PATCH] (dired-query): Display question with answer, when the user answers. --- lisp/dired-aux.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index 963866b3554..b517dffe9f7 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el @@ -839,6 +839,9 @@ Otherwise, the rule is a compression rule, and compression is done with gzip.") (sit-for 1) (apply 'message qprompt qs-args) (setq char (set qs-var (read-char)))) + ;; Display the question with the answer. + (message (concat (apply 'format qprompt qs-args) + (char-to-string char))) (memq (cdr elt) '(t y yes))))))) ;;;###autoload -- 2.39.2