[Emacs-diffs] /srv/bzr/emacs/trunk r107014: nnimap.el (nnimap-wait-for-response): Include the imap server name in the message for greater debuggability.

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 107014
author: Lars Ingebrigtsen <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Mon 2012-01-30 22:03:11 +0000
message:
  nnimap.el (nnimap-wait-for-response): Include the imap server name in the 
message for greater debuggability.
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/nnimap.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2012-01-29 00:28:05 +0000
+++ b/lisp/gnus/ChangeLog       2012-01-30 22:03:11 +0000
@@ -1,3 +1,8 @@
+2012-01-30  Lars Ingebrigtsen  <address@hidden>
+
+       * nnimap.el (nnimap-wait-for-response): Include the imap server name in
+       the message for greater debuggability.
+
 2012-01-28  Lars Ingebrigtsen  <address@hidden>
 
        * mm-view.el (mm-display-inline-fontify): Bind `font-lock-support-mode'

=== modified file 'lisp/gnus/nnimap.el'
--- a/lisp/gnus/nnimap.el       2012-01-27 14:32:25 +0000
+++ b/lisp/gnus/nnimap.el       2012-01-30 22:03:11 +0000
@@ -1738,7 +1738,8 @@
                        (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)