]> code.delx.au - gnu-emacs/commitdiff
(edebug-pop-to-buffer, edebug-display): Remove redundant checks.
authorJuanma Barranquero <lekktu@gmail.com>
Thu, 14 Jun 2007 00:10:43 +0000 (00:10 +0000)
committerJuanma Barranquero <lekktu@gmail.com>
Thu, 14 Jun 2007 00:10:43 +0000 (00:10 +0000)
lisp/emacs-lisp/edebug.el

index 9ae33599f09b66cf8807b1d91b3ffc1095078508..3d9e63bc80251210b2e36be273763fd8f8438e77 100644 (file)
@@ -369,7 +369,7 @@ Return the result of the last expression in BODY."
   ;; Otherwise, find a new window, possibly splitting one.
   (setq window
        (cond
-        ((and (windowp window) (edebug-window-live-p window)
+        ((and (edebug-window-live-p window)
               (eq (window-buffer window) buffer))
          window)
         ((eq (window-buffer (selected-window)) buffer)
@@ -2739,7 +2739,7 @@ MSG is printed after `::::} '."
 
                  ;; Unrestore edebug-buffer's window-start, if displayed.
                  (let ((window (car edebug-window-data)))
-                   (if (and window (edebug-window-live-p window)
+                   (if (and (edebug-window-live-p window)
                             (eq (window-buffer) edebug-buffer))
                        (progn
                          (set-window-start window (cdr edebug-window-data)