Restore the debugging window size more reliably

* lisp/emacs-lisp/debug.el (debug): Restore the debugging window
size more reliably (bug#12921).

diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el
index 2007f79634db7ab651120d4ae7fe8c76604dd91b..f76ae3fe69fb1c1b099dd2cd72534b0ab7a418e9 100644 (file)
--- a/lisp/emacs-lisp/debug.el
+++ b/lisp/emacs-lisp/debug.el
@@ -266,16 +266,15 @@ the debugger will not be entered."
                                    (window-frame debugger-previous-window)))
                          `((previous-window . ,debugger-previous-window))))))
                (setq debugger-window (selected-window))
-               (if (eq debugger-previous-window debugger-window)
-                   (when debugger-jumping-flag
-                     ;; Try to restore previous height of debugger
-                     ;; window.
-                     (condition-case nil
-                         (window-resize
-                          debugger-window
-                          (- debugger-previous-window-height
-                             (window-total-height debugger-window)))
-                       (error nil)))
+               (when debugger-jumping-flag
+                 ;; Try to restore previous height of debugger
+                 ;; window.
+                 (condition-case nil
+                     (window-resize
+                      debugger-window
+                      (- debugger-previous-window-height
+                         (window-total-height debugger-window)))
+                   (error nil))
                  (setq debugger-previous-window debugger-window))
                (message "")
                (let ((standard-output nil)