From 7a8cc3071ee4a5085c7fedb97a479da9ef9ed03d Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 2 Mar 1994 22:05:40 +0000 Subject: [PATCH] (Fdelete_frame): Don't initialize a Lisp_Object. Clean up line breaks. --- src/frame.c | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/src/frame.c b/src/frame.c index b8d335a5095..f90d5384b0e 100644 --- a/src/frame.c +++ b/src/frame.c @@ -701,14 +701,13 @@ but if the second optional argument FORCE is non-nil, you may do so.") CONSP (frames); frames = XCONS (frames)->cdr) { - Lisp_Object this = XCONS (frames)->car; + Lisp_Object this; + this = XCONS (frames)->car; if (! EQ (this, frame) && EQ (frame, - (WINDOW_FRAME - (XWINDOW - (FRAME_MINIBUF_WINDOW - (XFRAME (this))))))) + WINDOW_FRAME (XWINDOW + (FRAME_MINIBUF_WINDOW (XFRAME (this)))))) error ("Attempt to delete a surrogate minibuffer frame"); } } -- 2.39.5