From: Tomi Ollila <tomi.ollila@iki.fi>
Date: Thu, 23 Feb 2012 15:10:17 +0000 (+0200)
Subject: [RFC PATCH 3/3] emacs: use selection-menu for recipient address completion
X-Git-Url: http://git.tremily.us/gitweb.cgi?a=commitdiff_plain;h=687ff1a55eab3bf72c06e2b58cbd7e7e1c3f2dcc;p=notmuch-archives.git

[RFC PATCH 3/3] emacs: use selection-menu for recipient address completion
---

diff --git a/13/2a55e94440c6a083a498c0078c89cfcb145daa b/13/2a55e94440c6a083a498c0078c89cfcb145daa
new file mode 100644
index 000000000..ed4fabdac
--- /dev/null
+++ b/13/2a55e94440c6a083a498c0078c89cfcb145daa
@@ -0,0 +1,78 @@
+Return-Path: <too@guru.guru-group.fi>
+X-Original-To: notmuch@notmuchmail.org
+Delivered-To: notmuch@notmuchmail.org
+Received: from localhost (localhost [127.0.0.1])
+	by olra.theworths.org (Postfix) with ESMTP id 0E101431FAE
+	for <notmuch@notmuchmail.org>; Thu, 23 Feb 2012 07:10:21 -0800 (PST)
+X-Virus-Scanned: Debian amavisd-new at olra.theworths.org
+X-Spam-Flag: NO
+X-Spam-Score: 0
+X-Spam-Level: 
+X-Spam-Status: No, score=0 tagged_above=-999 required=5 tests=[none]
+	autolearn=disabled
+Received: from olra.theworths.org ([127.0.0.1])
+	by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)
+	with ESMTP id Hc40Wr-CEOJz for <notmuch@notmuchmail.org>;
+	Thu, 23 Feb 2012 07:10:20 -0800 (PST)
+Received: from guru.guru-group.fi (guru-group.fi [87.108.86.66])
+	by olra.theworths.org (Postfix) with ESMTP id B547B431FBC
+	for <notmuch@notmuchmail.org>; Thu, 23 Feb 2012 07:10:19 -0800 (PST)
+Received: by guru.guru-group.fi (Postfix, from userid 501)
+	id DB89D68057; Thu, 23 Feb 2012 17:10:20 +0200 (EET)
+From: Tomi Ollila <tomi.ollila@iki.fi>
+To: notmuch@notmuchmail.org
+Subject: [RFC PATCH 3/3] emacs: use selection-menu for recipient address
+	completion
+Date: Thu, 23 Feb 2012 17:10:17 +0200
+Message-Id: <1330009817-24148-3-git-send-email-tomi.ollila@iki.fi>
+X-Mailer: git-send-email 1.7.6.1
+In-Reply-To: <1330009817-24148-1-git-send-email-tomi.ollila@iki.fi>
+References: <1330009817-24148-1-git-send-email-tomi.ollila@iki.fi>
+Cc: Tomi Ollila <tomi.ollila@iki.fi>
+X-BeenThere: notmuch@notmuchmail.org
+X-Mailman-Version: 2.1.13
+Precedence: list
+List-Id: "Use and development of the notmuch mail system."
+	<notmuch.notmuchmail.org>
+List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,
+	<mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>
+List-Archive: <http://notmuchmail.org/pipermail/notmuch>
+List-Post: <mailto:notmuch@notmuchmail.org>
+List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>
+List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,
+	<mailto:notmuch-request@notmuchmail.org?subject=subscribe>
+X-List-Received-Date: Thu, 23 Feb 2012 15:10:21 -0000
+
+Replace use of completing-read with selection-menu when
+completing for recipient addresses.
+---
+ emacs/notmuch-address.el |    6 +++---
+ 1 files changed, 3 insertions(+), 3 deletions(-)
+
+diff --git a/emacs/notmuch-address.el b/emacs/notmuch-address.el
+index 2bf762b..1d63fe4 100644
+--- a/emacs/notmuch-address.el
++++ b/emacs/notmuch-address.el
+@@ -45,6 +45,8 @@ line."
+ (defun notmuch-address-options (original)
+   (process-lines notmuch-address-command original))
+ 
++(require 'selection-menu)
++
+ (defun notmuch-address-expand-name ()
+   (let* ((end (point))
+ 	 (beg (save-excursion
+@@ -61,9 +63,7 @@ line."
+ 		  ((eq num-options 1)
+ 		   (car options))
+ 		  (t
+-		   (completing-read (format "Address (%s matches): " num-options)
+-				    (cdr options) nil nil (car options)
+-				    'notmuch-address-history)))))
++		   (selection-menu "Send To:" options t)))))
+     (if chosen
+ 	(progn
+ 	  (push chosen notmuch-address-history)
+-- 
+1.7.8.2
+