nnimap.el (nnimap-wait-for-response): Ensure that we get the entire line we're waitin...

gnus-art.el (gnus-article-next-page-1): Because customized mode-line face with line-width greater than zero will cause RET in gnus summary buffer to scroll down article page-wise because auto vscroll happens, it should be temporalily disabled when doing a scroll-up.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 52c72ec..671b1b0 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -7,6 +7,18 @@
        * nnfolder.el (nnfolder-save-buffer): Don't let-bind copyright-update,
        in case it's not yet loaded.
 
+2011-02-20  Lars Ingebrigtsen  <larsi@gnus.org>
+
+       * nnimap.el (nnimap-wait-for-response): Ensure that we get the entire
+       line we're waiting for.
+
+2011-02-19  Darren Hoo  <darren.hoo@gmail.com>  (tiny change)
+
+       * gnus-art.el (gnus-article-next-page-1): Because customized mode-line
+       face with line-width greater than zero will cause RET in gnus summary
+       buffer to scroll down article page-wise because auto vscroll happens,
+       it should be temporalily disabled when doing a scroll-up.
+
 2011-02-19  Lars Ingebrigtsen  <larsi@gnus.org>
 
        * nnimap.el (nnimap-parse-copied-articles): Allow for "<foo> OK"

diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 533b010..19eee78 100644 (file)
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -6322,7 +6322,8 @@ specifies."
 
 (defun gnus-article-next-page-1 (lines)
   (condition-case ()
-      (let ((scroll-in-place nil))
+      (let ((scroll-in-place nil)
+           (auto-window-vscroll nil))
        (scroll-up lines))
     (end-of-buffer
      ;; Long lines may cause an end-of-buffer error.

diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 6b726b2..83b8c41 100644 (file)
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -1641,7 +1641,7 @@ textual parts.")
                                    (progn
                                      (forward-line -1)
                                      (looking-at "\\*"))))
-                       (not (looking-at (format "%d " sequence)))))
+                       (not (looking-at (format "%d .*\n" sequence)))))
            (when messagep
              (nnheader-message 7 "nnimap read %dk" (/ (buffer-size) 1000)))
            (nnheader-accept-process-output process)