[gnus git] branch master updated: =2= (nnimap-wait-for-response): Wait for results in a more secure manner. ; Try to avoid having point move around by not using save-window-excursion.

       via  8943cf1ad32a11652fe72ef4d34025f9618176ec (commit)
       via  6448d6cb1d4ba0bc592b81b72a94215ce0aea338 (commit)
      from  3ecb468fe961e2ab237028f1864bc9e9fdafb70e (commit)


- Log -----------------------------------------------------------------
commit 8943cf1ad32a11652fe72ef4d34025f9618176ec
Author: Lars Magne Ingebrigtsen <[email protected]>
Date:   Sun Jan 30 20:33:40 2011 -0800

    (nnimap-wait-for-response): Wait for results in a more secure manner.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index aea00e8..c029694 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2011-01-31  Lars Ingebrigtsen  <[email protected]>
 
+	* nnimap.el (nnimap-wait-for-response): Wait for results in a more
+	secure manner.
+
 	* gnus-art.el (article-update-date-lapsed): Try to avoid having point
 	move around by not using save-window-excursion.  It seems to work...
 
diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 04e4bd6..005f60b 100644
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -1589,17 +1589,14 @@ textual parts.")
 	  (goto-char (point-max))
 	  (while (and (setq openp (memq (process-status process)
 					'(open run)))
-		      (not (re-search-backward
-			    (format "^%d .*\n" sequence)
-			    (if nnimap-streaming
-				(max (point-min)
-				     (min
-				      (- (point) 500)
-				      (save-excursion
-					(forward-line -3)
-					(point))))
-			      (point-min))
-			    t)))
+		      (progn
+			;; Skip past any "*" lines that the server has
+			;; output.
+			(while (and (not (bobp))
+				    (progn
+				      (forward-line -1)
+				      (looking-at "\\*"))))
+			(not (looking-at (format "%d " sequence)))))
 	    (when messagep
 	      (nnheader-message 7 "nnimap read %dk" (/ (buffer-size) 1000)))
 	    (nnheader-accept-process-output process)

commit 6448d6cb1d4ba0bc592b81b72a94215ce0aea338
Author: Lars Magne Ingebrigtsen <[email protected]>
Date:   Sun Jan 30 20:21:20 2011 -0800

    Try to avoid having point move around by not using save-window-excursion.
    
    It seems to work...

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3d3f79f..aea00e8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-01-31  Lars Ingebrigtsen  <[email protected]>
+
+	* gnus-art.el (article-update-date-lapsed): Try to avoid having point
+	move around by not using save-window-excursion.  It seems to work...
+
 2011-01-31  Katsumi Yamaoka  <[email protected]>
 
 	* gnus-art.el (article-make-date-line): Work for user-defined format.
diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 71e9e18..0fdd6bd 100644
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -3646,8 +3646,7 @@ function and want to see what the date was before converting."
 (defun article-update-date-lapsed ()
   "Function to be run from a timer to update the lapsed time line."
   (save-match-data
-    (let (deactivate-mark)
-      (save-window-excursion
+    (let ((buffer (current-buffer)))
 	(ignore-errors
 	 (walk-windows
 	  (lambda (w)
@@ -3670,7 +3669,8 @@ function and want to see what the date was before converting."
 		(when (> (current-column) old-column)
 		  (beginning-of-line)
 		  (forward-char old-column)))))
-	  nil 'visible))))))
+	 nil 'visible))
+      (set-buffer buffer))))
 
 (defun gnus-start-date-timer (&optional n)
   "Start a timer to update the Date headers in the article buffers.

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog   |    8 ++++++++
 lisp/gnus-art.el |   50 +++++++++++++++++++++++++-------------------------
 lisp/nnimap.el   |   19 ++++++++-----------
 3 files changed, 41 insertions(+), 36 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project