comparison lisp/gnus/gnus-win.el @ 79143:f6c37512dd9e

Merge from gnus--rel--5.10 Patches applied: * gnus--rel--5.10 (patch 257-258) - Merge from emacs--rel--22 - Update from CVS 2007-10-15 Katsumi Yamaoka <yamaoka@jpl.org> * lisp/gnus/gnus-util.el (gnus-string<): New function. * lisp/gnus/gnus-sum.el (gnus-article-sort-by-author) (gnus-article-sort-by-subject): Use it. 2007-10-15 Katsumi Yamaoka <yamaoka@jpl.org> * lisp/gnus/gnus-win.el (gnus-configure-windows): Focus on the frame for which the frame-focus tag is set in gnus-buffer-configuration. Revision: emacs@sv.gnu.org/emacs--rel--22--patch-128
author Miles Bader <miles@gnu.org>
date Thu, 18 Oct 2007 21:09:02 +0000
parents 24202b793a08
children 1cb31606209f a3c27999decb 1251cabc40b7
comparison
equal deleted inserted replaced
79142:4fab4ac447b1 79143:f6c37512dd9e
469 (switch-to-buffer nntp-server-buffer) 469 (switch-to-buffer nntp-server-buffer)
470 (set-buffer nntp-server-buffer)) 470 (set-buffer nntp-server-buffer))
471 (gnus-configure-frame split) 471 (gnus-configure-frame split)
472 (run-hooks 'gnus-configure-windows-hook) 472 (run-hooks 'gnus-configure-windows-hook)
473 (when gnus-window-frame-focus 473 (when gnus-window-frame-focus
474 (select-frame (window-frame gnus-window-frame-focus)))))))) 474 (gnus-select-frame-set-input-focus
475 (window-frame gnus-window-frame-focus))))))))
475 476
476 (defun gnus-delete-windows-in-gnusey-frames () 477 (defun gnus-delete-windows-in-gnusey-frames ()
477 "Do a `delete-other-windows' in all frames that have Gnus windows." 478 "Do a `delete-other-windows' in all frames that have Gnus windows."
478 (let ((buffers (gnus-buffers))) 479 (let ((buffers (gnus-buffers)))
479 (mapcar 480 (mapcar