mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-11-21 18:38:08 +01:00
emacs: use def instead of initial-input for notmuch-show-browse-urls
This is the non-deprecated way to use completing-read. Additionally the old use was broken when using ivy for completing-read. For user's using completing-read-default they won't see the default URL now, but if they hit enter it will be visited. Alternatively they can select it with M-n. From the completing-read documentation for initial-input: This feature is deprecated--it is best to pass nil for INITIAL-INPUT and supply the default value DEF instead. The user can yank the default value into the minibuffer easily using M-n. Additionally collection is now all urls, rather than all but the first. I'm not sure why "(cdr urls)" was previously done.
This commit is contained in:
parent
f28e0a9337
commit
e083987338
1 changed files with 1 additions and 1 deletions
|
@ -2559,7 +2559,7 @@ browsing."
|
|||
(prompt (if kill "Copy URL to kill ring: " "Browse URL: "))
|
||||
(fn (if kill #'kill-new #'browse-url)))
|
||||
(if urls
|
||||
(funcall fn (completing-read prompt (cdr urls) nil nil (car urls)))
|
||||
(funcall fn (completing-read prompt urls nil nil nil nil (car urls)))
|
||||
(message "No URLs found."))))
|
||||
|
||||
(provide 'notmuch-show)
|
||||
|
|
Loading…
Reference in a new issue