1 files 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");
         }
     }