nnimap.el (nnimap-wait-for-response): Include the imap server name in the...

nnimap.el (nnimap-wait-for-response): Include the imap server name in the message for greater debuggability.

lisp/gnus/ChangeLog

+2012-01-30  Lars Ingebrigtsen  <larsi@gnus.org>
+
+	* nnimap.el (nnimap-wait-for-response): Include the imap server name in
+	the message for greater debuggability.
+
 2012-01-28  Lars Ingebrigtsen  <larsi@gnus.org>
 
 	* mm-view.el (mm-display-inline-fontify): Bind `font-lock-support-mode'

lisp/gnus/nnimap.el

@@ -1738,7 +1738,8 @@ textual parts.")
 			(not (looking-at (format "%d .*\n" sequence)))))
 	    (when messagep
 	      (nnheader-message-maybe
-	       7 "nnimap read %dk" (/ (buffer-size) 1000)))
+	       7 "nnimap read %dk from %s" (/ (buffer-size) 1000)
+	       nnimap-address))
 	    (nnheader-accept-process-output process)
 	    (goto-char (point-max)))
           openp)