Mercurial > emacs

changeset 23319:6d8f2c66943f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(gnus-output-to-rmail): adjust to `rmail-output-to-rmail-file'
author Karl Heuer <kwzh@gnu.org>
date Fri, 25 Sep 1998 17:00:25 +0000
parents 102eb438b2e1
children 19a7a9d3fcc4
files lisp/gnus/gnus-util.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/gnus-util.el	Fri Sep 25 16:53:04 1998 +0000
+++ b/lisp/gnus/gnus-util.el	Fri Sep 25 17:00:25 1998 +0000
@@ -755,10 +755,12 @@
 	    (when msg
 	      (goto-char (point-min))
 	      (widen)
-	      (search-backward "\^_")
+	      (search-backward "\n\^_")
 	      (narrow-to-region (point) (point-max))
-	      (goto-char (1+ (point-min)))
 	      (rmail-count-new-messages t)
+	      (if (rmail-summary-exists)
+		  (rmail-select-summary
+		   (rmail-update-summary)))
 	      (rmail-show-message msg))))))
     (kill-buffer tmpbuf)))