Changes committed gnus/lisp (ChangeLog imap.el)

"Reiner Steib" <[email protected]> Thu, 08 Jan 2009 21:51:30 +0100
Newsgroups gmane.emacs.gnus.commits
Message-ID <[email protected]>
Modified: ChangeLog imap.el

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


Index: ChangeLog
diff -u gnus/lisp/ChangeLog:7.1972 gnus/lisp/ChangeLog:7.1973
--- ChangeLog:7.1972	Thu Jan  8 21:39:09 2009
+++ ChangeLog	Thu Jan  8 21:51:29 2009
@@ -5,6 +5,10 @@
 
 	* message.el (message-fix-before-sending): Amend comment.
 
+2009-01-08  Dave Love  <[email protected]>
+
+	* imap.el (imap-message-appenduid-1): Fix typo in imap-fetch-safe call.
+
 2009-01-07  David Engster  <[email protected]>
 
 	* gnus-msg.el (gnus-inews-do-gcc): Fix last patch to deal with
Index: imap.el
diff -u gnus/lisp/imap.el:7.51 gnus/lisp/imap.el:7.52
--- imap.el:7.51	Thu Jan  8 21:39:09 2009
+++ imap.el	Thu Jan  8 21:51:29 2009
@@ -1876,7 +1876,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))))