Mercurial > emacs

comparison lisp/mail/rnews.el @ 21099:440d5927ef18

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(news-exit): Use quit-window.
author Richard M. Stallman <rms@gnu.org>
date Sun, 08 Mar 1998 00:23:16 +0000
parents 83f275dcd93a
children d84de2f4c38d
comparison
equal deleted inserted replaced
21098:c5a14d40e00e 21099:440d5927ef18
682 (progn (message "Updating %s..." news-startup-file) 682 (progn (message "Updating %s..." news-startup-file)
683 (news-update-newsrc-file) 683 (news-update-newsrc-file)
684 (news-write-certifications) 684 (news-write-certifications)
685 (message "Updating %s... done" news-startup-file) 685 (message "Updating %s... done" news-startup-file)
686 (message "Now do some real work") 686 (message "Now do some real work")
687 (and (fboundp 'bury-buffer) (bury-buffer (current-buffer))) 687 (quit-window)
688 (switch-to-buffer news-buffer-save) 688 (switch-to-buffer news-buffer-save)
689 (setq news-user-group-list ())) 689 (setq news-user-group-list ()))
690 (message ""))) 690 (message "")))
691 691
692 (defun news-update-newsrc-file () 692 (defun news-update-newsrc-file ()