From c520265ed4cf880773715c2065be66b1e024ea06 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 25 May 1998 04:20:12 +0000 Subject: (Fdelete_windows_on): For FRAME, change t to nil and nil to t, but don't change other values. --- src/window.c | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) (limited to 'src/window.c') diff --git a/src/window.c b/src/window.c index 817eb9fdc5..50541f094d 100644 --- a/src/window.c +++ b/src/window.c @@ -1642,17 +1642,20 @@ DEFUN ("delete-windows-on", Fdelete_windows_on, Sdelete_windows_on, 1, 2, "bDelete windows on (buffer): ", "Delete all windows showing BUFFER.\n\ Optional second argument FRAME controls which frames are affected.\n\ -If nil or omitted, delete all windows showing BUFFER in any frame.\n\ -If t, delete only windows showing BUFFER in the selected frame.\n\ -If `visible', delete all windows showing BUFFER in any visible frame.\n\ -If a frame, delete only windows showing BUFFER in that frame.") +If optional argument FRAME is `visible', search all visible frames.\n\ +If FRAME is 0, search all visible and iconified frames.\n\ +If FRAME is nil, search all frames.\n\ +If FRAME is t, search only the selected frame.\n\ +If FRAME is a frame, search only that frame.") (buffer, frame) Lisp_Object buffer, frame; { /* FRAME uses t and nil to mean the opposite of what window_loop expects. */ - if (! FRAMEP (frame)) - frame = NILP (frame) ? Qt : Qnil; + if (NILP (frame)) + frame = Qt; + else if (EQ (frame, Qt)) + frame = Qnil; if (!NILP (buffer)) { -- cgit v1.2.3