# HG changeset patch
# User Katsumi Yamaoka <yamaoka@jpl.org>
# Date 1290734857 0
# Node ID cb1fa19c3f33e2e7ea760bd0525b281a7fba264e
# Parent  2ec43a7063b32e4c9c8876450c80fc5c8e621d06
nnimap.el (nnimap-find-uid-response): The UID is the last element in the list.

diff -r 2ec43a7063b3 -r cb1fa19c3f33 lisp/gnus/ChangeLog
--- a/lisp/gnus/ChangeLog	Fri Nov 26 01:14:40 2010 +0000
+++ b/lisp/gnus/ChangeLog	Fri Nov 26 01:27:37 2010 +0000
@@ -6,6 +6,7 @@
 	(nnimap-request-accept-article): Use the UID returned, if any.
 	(nnimap-request-move-article): Use the UID returned, if any.
 	(nnimap-get-groups): Reimplement to work with folded lines.
+	(nnimap-find-uid-response): The UID is the last element in the list.
 
 2010-11-25  Katsumi Yamaoka  <yamaoka@jpl.org>
 
diff -r 2ec43a7063b3 -r cb1fa19c3f33 lisp/gnus/nnimap.el
--- a/lisp/gnus/nnimap.el	Fri Nov 26 01:14:40 2010 +0000
+++ b/lisp/gnus/nnimap.el	Fri Nov 26 01:27:37 2010 +0000
@@ -984,7 +984,7 @@
 		       group message-id)))))))))
 
 (defun nnimap-find-uid-response (name list)
-  (let ((result (nth 2 (nnimap-find-response-element name list))))
+  (let ((result (car (last (nnimap-find-response-element name list)))))
     (and result
 	 (string-to-number result))))