Mercurial > emacs
diff lisp/gnus/gnus-art.el @ 78598:2d4fbb82deec
Merge from gnus--rel--5.10
Patches applied:
* gnus--rel--5.10 (patch 245)
- Update from CVS
2007-08-17 Katsumi Yamaoka <yamaoka@jpl.org>
* lisp/gnus/gnus-art.el (gnus-article-summary-command-nosave)
(gnus-article-read-summary-keys): Don't use 3rd arg of pop-to-buffer.
2007-08-14 Katsumi Yamaoka <yamaoka@jpl.org>
* lisp/gnus/gnus.el (gnus-maximum-newsgroup): New variable.
* lisp/gnus/gnus-agent.el (gnus-agent-fetch-headers): Limit the range of articles
according to gnus-maximum-newsgroup.
* lisp/gnus/gnus-sum.el (gnus-articles-to-read, gnus-list-of-unread-articles)
(gnus-list-of-read-articles, gnus-sequence-of-unread-articles): Limit
the range of articles according to gnus-maximum-newsgroup.
2007-08-14 Katsumi Yamaoka <yamaoka@jpl.org>
* man/gnus.texi (Selecting a Group): Mention gnus-maximum-newsgroup.
Revision: emacs@sv.gnu.org/emacs--rel--22--patch-96
author | Miles Bader <miles@gnu.org> |
---|---|
date | Tue, 21 Aug 2007 04:52:22 +0000 |
parents | 28c0174177f4 |
children | f4c90d55f00f |
line wrap: on
line diff
--- a/lisp/gnus/gnus-art.el Mon Aug 20 15:52:47 2007 +0000 +++ b/lisp/gnus/gnus-art.el Tue Aug 21 04:52:22 2007 +0000 @@ -5607,7 +5607,7 @@ "Execute the last keystroke in the summary buffer." (interactive) (let (func) - (pop-to-buffer gnus-article-current-summary nil (not (featurep 'xemacs))) + (pop-to-buffer gnus-article-current-summary) (setq func (lookup-key (current-local-map) (this-command-keys))) (call-interactively func))) @@ -5646,8 +5646,7 @@ (member keys nosave-in-article)) (let (func) (save-window-excursion - (pop-to-buffer gnus-article-current-summary - nil (not (featurep 'xemacs))) + (pop-to-buffer gnus-article-current-summary) ;; We disable the pick minor mode commands. (let (gnus-pick-mode) (setq func (lookup-key (current-local-map) keys)))) @@ -5659,16 +5658,14 @@ (call-interactively func) (setq new-sum-point (point))) (when (member keys nosave-but-article) - (pop-to-buffer gnus-article-buffer - nil (not (featurep 'xemacs))))) + (pop-to-buffer gnus-article-buffer))) ;; These commands should restore window configuration. (let ((obuf (current-buffer)) (owin (current-window-configuration)) (opoint (point)) win func in-buffer selected new-sum-start new-sum-hscroll) (cond (not-restore-window - (pop-to-buffer gnus-article-current-summary - nil (not (featurep 'xemacs)))) + (pop-to-buffer gnus-article-current-summary)) ((setq win (get-buffer-window gnus-article-current-summary)) (select-window win)) (t