Re: FIXMEs in imap.el and nnimap.el

[Dave Love <fx@gnu.org>]

[-- Attachment #1: Type: text/plain, Size: 371 bytes --]

I wrote:

> Certainly my version of imap-fetch-safe will fail if it's not called
> with a pair.

Sorry, I was confused by the context and just realized that the typo is
in my code originally.  I don't understand that, because (a) I thought
I'd fixed it before sending the patch, and (b) I thought I was running
with a copy up-to-date with CVS...  Anyhow, this is right:


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Type: text/x-patch, Size: 724 bytes --]

2009-01-07  Dave Love  <fx@gnu.org>

	* imap.el (imap-message-appenduid-1): Fix typo in imap-fetch-safe call.

Index: imap.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/imap.el,v
retrieving revision 7.50
diff -u -r7.50 imap.el
--- imap.el	1 Jan 2009 18:50:34 -0000	7.50
+++ imap.el	7 Jan 2009 20:49:30 -0000
@@ -1870,7 +1870,7 @@
 	  (imap-message-data (make-vector 2 0)))
       (when (imap-mailbox-examine-1 mailbox)
 	(prog1
-	    (and (imap-fetch-safe '("*" "*:*") "UID")
+	    (and (imap-fetch-safe '("*" . "*:*") "UID")
 		 (list (imap-mailbox-get-1 'uidvalidity mailbox)
 		       (apply 'max (imap-message-map
 				    (lambda (uid prop) uid) 'UID))))