From 4e2cc2f31f8e516901bc3cacf98def678cd45dc9 Mon Sep 17 00:00:00 2001 From: Nelson Ferreira Date: Mon, 18 Jun 2012 23:12:10 +0000 Subject: [PATCH] gnus-win.el (gnus-configure-frame): Pass an arg to window-dedicated-p --- lisp/gnus/ChangeLog | 4 ++++ lisp/gnus/gnus-win.el | 4 +++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 9d9a86ca406..0923ed4db96 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2012-06-18 Nelson Ferreira (tiny change) + + * gnus-win.el (gnus-configure-frame): Pass an arg to window-dedicated-p. + 2012-06-17 Toke Høiland-Jørgensen (tiny change) * nnmaildir.el (nnmaildir-request-expire-articles): Ensure that `time' diff --git a/lisp/gnus/gnus-win.el b/lisp/gnus/gnus-win.el index efe2a319854..bd9ea10fdc4 100644 --- a/lisp/gnus/gnus-win.el +++ b/lisp/gnus/gnus-win.el @@ -273,7 +273,9 @@ See the Gnus manual for an explanation of the syntax used.") (cond ((eq buf (window-buffer (selected-window))) (set-buffer buf)) - ((eq t (window-dedicated-p)) + ((eq t (window-dedicated-p + ;; XEmacs version of `window-dedicated-p' requires it. + (selected-window))) ;; If the window is hard-dedicated, we have a problem because ;; we just can't do what we're asked. But signaling an error, ;; like `switch-to-buffer' would do, is not an option because -- 2.11.4.GIT