mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-11-25 04:18:08 +01:00
emacs: include first match in address completion
The current code for address completion takes the list of possible completions (whether generated internally or externally), makes the first match the initial value for the completion, and puts all the others (but not the first match) into the possible completions. This has the nice effect that the <down> key takes you immediately to the next completion (whereas if the first match were included in the possible completions it would take you to the first match again). However, it has two side effects. First, once you have completed to the full match you find it says and try completing again you get told "no match" not "sole completion". Secondly, if you delete some of the text and try completing you don't get the first match as an option. This tries to get round most of these problems by including the full list of possible completions, but with the first match moved to the very end of the list.
This commit is contained in:
parent
385413e059
commit
0c52b5d3b2
1 changed files with 8 additions and 1 deletions
|
@ -194,7 +194,14 @@ external commands."
|
||||||
(t
|
(t
|
||||||
(funcall notmuch-address-selection-function
|
(funcall notmuch-address-selection-function
|
||||||
(format "Address (%s matches): " num-options)
|
(format "Address (%s matches): " num-options)
|
||||||
(cdr options) (car options))))))
|
;; We put the first match as the initial
|
||||||
|
;; input; we put all the matches as
|
||||||
|
;; possible completions, moving the
|
||||||
|
;; first match to the end of the list
|
||||||
|
;; makes cursor up/down in the list work
|
||||||
|
;; better.
|
||||||
|
(append (cdr options) (list (car options)))
|
||||||
|
(car options))))))
|
||||||
(if chosen
|
(if chosen
|
||||||
(progn
|
(progn
|
||||||
(push chosen notmuch-address-history)
|
(push chosen notmuch-address-history)
|
||||||
|
|
Loading…
Reference in a new issue