Mercurial > emacs
diff lisp/info.el @ 39757:0597a7bc10a2
(Info-follow-reference): Display default values in prompts as
`(default ...)', not `(...)'.
author | Miles Bader <miles@gnu.org> |
---|---|
date | Thu, 11 Oct 2001 01:19:49 +0000 |
parents | 67386e5484d6 |
children | ac7e8ad8b1d6 |
line wrap: on
line diff
--- a/lisp/info.el Thu Oct 11 00:50:53 2001 +0000 +++ b/lisp/info.el Thu Oct 11 01:19:49 2001 +0000 @@ -1352,8 +1352,9 @@ (setq default (car (car completions)))) (if completions (let ((input (completing-read (if default - (concat "Follow reference named: (" - default ") ") + (concat + "Follow reference named: (default " + default ") ") "Follow reference named: ") completions nil t))) (list (if (equal input "")