[PATCH] emacs: Don't prompt the user to choose from zero matching addresses.

Tomi Ollila tomi.ollila at iki.fi
Wed Dec 21 05:20:04 PST 2011


On Wed, 21 Dec 2011 12:35:27 +0000, David Edmondson <dme at dme.org> wrote:
> If the address matching function generates no matches, don't prompt
> the user to choose between them (!). Instead, generate a message to
> report that there were no matches.
> ---

LGTM

>  emacs/notmuch-address.el |   21 ++++++++++++++-------
>  1 files changed, 14 insertions(+), 7 deletions(-)
> 
> diff --git a/emacs/notmuch-address.el b/emacs/notmuch-address.el
> index 1a7c577..8eba7a0 100644
> --- a/emacs/notmuch-address.el
> +++ b/emacs/notmuch-address.el
> @@ -54,15 +54,22 @@ line."
>  	 (completion-ignore-case t)
>  	 (options (notmuch-address-options orig))
>  	 (num-options (length options))
> -	 (chosen (if (eq num-options 1)
> -		     (car options)
> +	 (chosen (cond
> +		  ((eq num-options 0)
> +		   nil)
> +		  ((eq num-options 1)
> +		   (car options))
> +		  (t
>  		   (completing-read (format "Address (%s matches): " num-options)
>  				    (cdr options) nil nil (car options)
> -				    'notmuch-address-history))))
> -    (when chosen
> -      (push chosen notmuch-address-history)
> -      (delete-region beg end)
> -      (insert chosen))))
> +				    'notmuch-address-history)))))
> +    (if chosen
> +	(progn
> +	  (push chosen notmuch-address-history)
> +	  (delete-region beg end)
> +	  (insert chosen))
> +      (message "No matches.")
> +      (ding))))
>  
>  ;; Copied from `w3m-which-command'.
>  (defun notmuch-address-locate-command (command)
> -- 
> 1.7.7.3

Tomi


More information about the notmuch mailing list