procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(dired-query): Display question with answer, when the user answers.

Browse source
This commit is contained in:
Richard M. Stallman 2005-07-03 16:10:07 +00:00
parent a4842ffa6e
commit de5544e8b8
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/dired-aux.el
View file

@ -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