mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-25 07:28:20 +00:00
* net/mairix.el (mairix-widget-send-query): Send -1 instead of nil
to mairix-search to suppress threading (Bug#5342).
This commit is contained in:
parent
67f6e72bd3
commit
6554a5df3a
@ -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):
|
||||
|
@ -341,7 +341,7 @@ Currently there are 'threads and 'flags.")
|
||||
|
||||
(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 @@ See %s for details" mairix-output-buffer)))
|
||||
"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)
|
||||
|
Loading…
Reference in New Issue
Block a user