diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2020-09-06 20:35:11 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2020-09-06 20:35:11 +0200 |
| commit | 660d13bd7b47c1b7db990adcc671b55b6f1f83f2 (patch) | |
| tree | b470b0f2fcba1f428556eb2cebe4988ccf4e294e /lisp/erc | |
| parent | 3444f397c7d20ca59f7b18f6fe95aa79b33727e5 (diff) | |
| download | emacs-660d13bd7b47c1b7db990adcc671b55b6f1f83f2.tar.gz | |
Use format-prompt in calls to completing-read with a default value
* lisp/textmodes/rst.el (rst-insert-list-new-item):
* lisp/tab-bar.el (tab-bar-switch-to-tab):
* lisp/profiler.el (profiler-start):
* lisp/frame.el (set-frame-font):
* lisp/erc/erc.el (erc-join-channel):
* lisp/emacs-lock.el (emacs-lock--set-mode):
* lisp/emacs-lisp/elp.el (elp-set-master):
* lisp/emacs-lisp/checkdoc.el ()
(checkdoc-this-string-valid-engine):
* lisp/calendar/todo-mode.el (todo-find-filtered-items-file):
* lisp/calendar/calendar.el (calendar-set-date-style): Use
`format-prompt' in calls to completing-read that has a default
value, but didn't mention that in the prompt.
Diffstat (limited to 'lisp/erc')
| -rw-r--r-- | lisp/erc/erc.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el index 8712113790b..e7e43f87347 100644 --- a/lisp/erc/erc.el +++ b/lisp/erc/erc.el @@ -4072,7 +4072,8 @@ If `point' is at the beginning of a channel name, use that as default." (table (when (erc-server-buffer-live-p) (set-buffer (process-buffer erc-server-process)) erc-channel-list))) - (completing-read "Join channel: " table nil nil nil nil chnl)) + (completing-read (format-prompt "Join channel" chnl) + table nil nil nil nil chnl)) (when (or current-prefix-arg erc-prompt-for-channel-key) (read-from-minibuffer "Channel key (RET for none): " nil)))) (erc-cmd-JOIN channel (when (>= (length key) 1) key))) |