nnimap.el (nnimap-make-thread-query): Quote message-ids for gmail.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 400abd5..f90e180 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2011-07-24  Andrew Cohen  <cohen@andy.bu.edu>
+
+       * nnimap.el (nnimap-make-thread-query): Quote message-ids for gmail.
+
 2011-07-23  Andrew Cohen  <cohen@andy.bu.edu>
 
        * nnir.el (nnir-search-thread): New function to make an nnir group

diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 8a0d635..52de488 100644 (file)
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -1947,13 +1947,13 @@ textual parts.")
         (refs (split-string
                (or (mail-header-references header)
                    "")))
-       (value
-        (format
-         "(OR HEADER REFERENCES %s HEADER Message-Id %s)"
-         id id)))
+        (value
+         (format
+          "(OR HEADER REFERENCES %S HEADER Message-Id %S)"
+          id id)))
     (dolist (refid refs value)
       (setq value (format
-                  "(OR (OR HEADER Message-Id %s HEADER REFERENCES %s) %s)"
+                  "(OR (OR HEADER Message-Id %S HEADER REFERENCES %S) %s)"
                   refid refid value)))))