Mercurial > emacs
changeset 63933:dd8f5792476e
(dired-query): Display question with answer, when the user answers.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 03 Jul 2005 16:10:07 +0000 |
| parents | bbf23e50d797 |
| children | 44925622f813 |
| files | lisp/dired-aux.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/dired-aux.el Sun Jul 03 16:09:07 2005 +0000 +++ b/lisp/dired-aux.el Sun Jul 03 16:10:07 2005 +0000 @@ -839,6 +839,9 @@ (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