diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2020-09-06 22:59:48 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-09-06 23:19:43 +0200 |
| commit | 95268cdb7e63c2ef881d74039284bbb88e132d84 (patch) | |
| tree | 78c59edd20ffd7090bcdf3f928cb34ea7feaca33 /lisp/vc/vc-annotate.el | |
| parent | 52a92c6e7bab2861be47a4637a924b2a74b24b66 (diff) | |
| download | emacs-95268cdb7e63c2ef881d74039284bbb88e132d84.tar.gz | |
Use format-prompt in read-string calls (that have default values)
* lisp/vc/vc-annotate.el (vc-annotate):
* lisp/vc/log-edit.el (log-edit-comment-search-backward)
(log-edit-comment-search-forward):
* lisp/textmodes/rst.el (rst-insert-list-new-item):
* lisp/server.el (server-force-delete):
* lisp/mpc.el (mpc):
* lisp/frame.el (set-frame-name):
* lisp/emulation/cua-rect.el (cua-sequence-rectangle):
* lisp/cedet/semantic/symref/list.el (semantic-symref-regexp):
* lisp/calendar/todo-mode.el (todo-read-time): Use `format-prompt'
in `read-string' calls that have defaults.
Diffstat (limited to 'lisp/vc/vc-annotate.el')
| -rw-r--r-- | lisp/vc/vc-annotate.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/vc/vc-annotate.el b/lisp/vc/vc-annotate.el index 18bcc6c2f10..5198bccf846 100644 --- a/lisp/vc/vc-annotate.el +++ b/lisp/vc/vc-annotate.el @@ -408,7 +408,7 @@ should be applied to the background or to the foreground." (if (null current-prefix-arg) vc-annotate-display-mode (float (string-to-number - (read-string "Annotate span days (default 20): " + (read-string (format-prompt "Annotate span days" 20) nil nil "20"))))))) (vc-ensure-vc-buffer) (setq vc-annotate-display-mode display-mode) ;Not sure why. --Stef |