mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-02-01 20:06:00 +00:00
(gnus-all-windows-visible-p): Don't consider non-visible windows.
This commit is contained in:
parent
74c35a48a7
commit
a7f7f2540f
@ -1,3 +1,8 @@
|
||||
2004-05-18 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* gnus-win.el (gnus-all-windows-visible-p): Don't consider
|
||||
non-visible windows.
|
||||
|
||||
2004-05-07 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* rfc2047.el (rfc2047-encode-message-header): Don't encode non-address
|
||||
|
@ -1,5 +1,5 @@
|
||||
;;; gnus-win.el --- window configuration functions for Gnus
|
||||
;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2002
|
||||
;; Copyright (C) 1996, 97, 98, 1999, 2000, 02, 2004
|
||||
;; Free Software Foundation, Inc.
|
||||
|
||||
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
|
||||
@ -516,7 +516,7 @@ should have point."
|
||||
(unless buffer
|
||||
(error "Invalid buffer type: %s" type))
|
||||
(if (and (setq buf (get-buffer (gnus-window-to-buffer-helper buffer)))
|
||||
(setq win (get-buffer-window buf t)))
|
||||
(setq win (get-buffer-window buf 0)))
|
||||
(if (memq 'point split)
|
||||
(setq all-visible win))
|
||||
(setq all-visible nil)))
|
||||
|
Loading…
Reference in New Issue
Block a user