emacs: Tell the user how many addresses matched when completing

When completing an address, tell the user how many addresses in the
database matched the query.

Edited-by: Carl Worth <cworth@cworth.org>: Removed a stray numeric
literal that was causing a compiler warning.

diff --git a/emacs/notmuch-address.el b/emacs/notmuch-address.el
index 69a52a295a59404b70bc8a9d8d75e809a083931b..1a7c5771ad9931650bdeed2a9fdab8ed51d81260 100644 (file)
--- a/emacs/notmuch-address.el
+++ b/emacs/notmuch-address.el
@@ -53,9 +53,11 @@ line."
         (orig (buffer-substring-no-properties beg end))
         (completion-ignore-case t)
         (options (notmuch-address-options orig))
-        (chosen (if (eq (length options) 1)
+        (num-options (length options))
+        (chosen (if (eq num-options 1)
                     (car options)
-                  (completing-read "Address: " (cdr options) nil nil (car options)
+                  (completing-read (format "Address (%s matches): " num-options)
+                                   (cdr options) nil nil (car options)
                                    'notmuch-address-history))))
     (when chosen
       (push chosen notmuch-address-history)