Erase buffer before appending for easier debugging.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 87db427..9c59f13 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2010-10-31  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * nnimap.el (nnimap-request-accept-article): Erase buffer before
+       appending for easier debugging.
+
        * gnus-art.el (gnus-treat-article): Only inhibit body washing, and
        leave the header washing to take place.
 

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 11795b1..3ecee73 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -930,6 +930,7 @@ textual parts.")
       (nnimap-add-cr)
       (setq message (buffer-substring-no-properties (point-min) (point-max)))
       (with-current-buffer (nnimap-buffer)
+       (erase-buffer)
        (setq sequence (nnimap-send-command
                        "APPEND %S {%d}" (utf7-encode group t)
                        (length message)))