# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1263574543 18000
# Node ID b86e6346b4a86b64411f9c51325bc9a1e83f5bca
# Parent  2643225473f718c22aca9940f00c018fb6a50451
* net/mairix.el (mairix-widget-send-query): Send -1 instead of nil
to mairix-search to suppress threading (Bug#5342).

diff -r 2643225473f7 -r b86e6346b4a8 lisp/ChangeLog
--- a/lisp/ChangeLog	Fri Jan 15 21:52:50 2010 +0900
+++ b/lisp/ChangeLog	Fri Jan 15 11:55:43 2010 -0500
@@ -1,3 +1,8 @@
+2010-01-15   David Abrahams  <dave@boostpro.com>  (tiny change)
+
+	* net/mairix.el (mairix-widget-send-query): Send -1 instead of nil
+	to mairix-search to suppress threading (Bug#5342).
+
 2010-01-15  Kenichi Handa  <handa@m17n.org>
 
 	* international/mule-cmds.el (canonicalize-coding-system-name):
diff -r 2643225473f7 -r b86e6346b4a8 lisp/net/mairix.el
--- a/lisp/net/mairix.el	Fri Jan 15 21:52:50 2010 +0900
+++ b/lisp/net/mairix.el	Fri Jan 15 11:55:43 2010 -0500
@@ -341,7 +341,7 @@
 
 (defun mairix-search (search threads)
   "Call Mairix with SEARCH.
-If THREADS is t, also display whole threads of found
+If THREADS is non-nil, also display whole threads of found
 messages.  Results will be put into the default search file."
   (interactive
    (list
@@ -595,9 +595,7 @@
   "Send query from WIDGETS to mairix binary."
   (mairix-search
    (mairix-widget-make-query-from-widgets widgets)
-   (if (widget-value (cadr (assoc "Threads" widgets)))
-       t
-     -1))
+   (if (widget-value (cadr (assoc "Threads" widgets))) t))
   (kill-buffer mairix-customize-query-buffer))
 
 (defun mairix-widget-save-search (widgets)