* frame.c (delete_frame): Avoid unnecessary 'this_f' test.

Fixes: debbugs:14970

diff --git a/src/ChangeLog b/src/ChangeLog
index c5448fd..8d6d34a 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2013-07-28  Paul Eggert  <eggert@cs.ucla.edu>
+
+       * frame.c (delete_frame): Avoid unnecessary 'this_f' test (Bug#14970).
+
 2013-07-28  Eli Zaretskii  <eliz@gnu.org>
 
        * w32fns.c (w32_wnd_proc) <WM_IME_STARTCOMPOSITION>: Make sure the

diff --git a/src/frame.c b/src/frame.c
index 0b59b43..95f5356 100644 (file)
--- a/src/frame.c
+++ b/src/frame.c
@@ -1158,12 +1158,13 @@ delete_frame (Lisp_Object frame, Lisp_Object force)
       FOR_EACH_FRAME (frames, this)
        {
          Lisp_Object fminiw;
-         struct frame *this_f;
 
-         if (! EQ (this, frame)
-             && (this_f = XFRAME (this))
-             && WINDOWP (fminiw = FRAME_MINIBUF_WINDOW (this_f))
-             && EQ (frame, WINDOW_FRAME (XWINDOW (fminiw))))
+         if (EQ (this, frame))
+           continue;
+
+         fminiw = FRAME_MINIBUF_WINDOW (XFRAME (this));
+
+         if (WINDOWP (fminiw) && EQ (frame, WINDOW_FRAME (XWINDOW (fminiw))))
            {
              /* If we MUST delete this frame, delete the other first.
                 But do this only if FORCE equals `noelisp'.  */