aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2004-05-18 16:38:40 +0000
committerStefan Monnier2004-05-18 16:38:40 +0000
commita7f7f2540f02834ad128d0c9357a4dbd8222dff4 (patch)
tree1c5ab7fd4db8d0e4f5edc2d7023db779b9d16ff1
parent74c35a48a74ba1e57f39100d030b8e299860494e (diff)
downloademacs-a7f7f2540f02834ad128d0c9357a4dbd8222dff4.tar.gz
emacs-a7f7f2540f02834ad128d0c9357a4dbd8222dff4.zip
(gnus-all-windows-visible-p): Don't consider non-visible windows.
-rw-r--r--lisp/gnus/ChangeLog5
-rw-r--r--lisp/gnus/gnus-win.el4
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index e2cea8301ec..00a2634ee8c 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
12004-05-18 Stefan Monnier <monnier@iro.umontreal.ca>
2
3 * gnus-win.el (gnus-all-windows-visible-p): Don't consider
4 non-visible windows.
5
12004-05-07 Stefan Monnier <monnier@iro.umontreal.ca> 62004-05-07 Stefan Monnier <monnier@iro.umontreal.ca>
2 7
3 * rfc2047.el (rfc2047-encode-message-header): Don't encode non-address 8 * rfc2047.el (rfc2047-encode-message-header): Don't encode non-address
diff --git a/lisp/gnus/gnus-win.el b/lisp/gnus/gnus-win.el
index fa082e7c1d0..4d0c18a8daf 100644
--- a/lisp/gnus/gnus-win.el
+++ b/lisp/gnus/gnus-win.el
@@ -1,5 +1,5 @@
1;;; gnus-win.el --- window configuration functions for Gnus 1;;; gnus-win.el --- window configuration functions for Gnus
2;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2002 2;; Copyright (C) 1996, 97, 98, 1999, 2000, 02, 2004
3;; Free Software Foundation, Inc. 3;; Free Software Foundation, Inc.
4 4
5;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> 5;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
@@ -516,7 +516,7 @@ should have point."
516 (unless buffer 516 (unless buffer
517 (error "Invalid buffer type: %s" type)) 517 (error "Invalid buffer type: %s" type))
518 (if (and (setq buf (get-buffer (gnus-window-to-buffer-helper buffer))) 518 (if (and (setq buf (get-buffer (gnus-window-to-buffer-helper buffer)))
519 (setq win (get-buffer-window buf t))) 519 (setq win (get-buffer-window buf 0)))
520 (if (memq 'point split) 520 (if (memq 'point split)
521 (setq all-visible win)) 521 (setq all-visible win))
522 (setq all-visible nil))) 522 (setq all-visible nil)))