mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(gnus-output-to-rmail): adjust to

Browse Source 
`rmail-output-to-rmail-file'
This commit is contained in:
Karl Heuer 1998-09-25 17:00:25 +00:00
parent ec0a2f45a2
commit a9d6e49639
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/gnus/gnus-util.el
View File

@ -755,10 +755,12 @@ with potentially long computations."
(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)))