changeset 81391:0842cee3ad33

(edebug-pop-to-buffer, edebug-display): Remove redundant checks.
author Juanma Barranquero <lekktu@gmail.com>
date Thu, 14 Jun 2007 00:10:43 +0000
parents fe478726dca2
children f0107aee8e99
files lisp/emacs-lisp/edebug.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/edebug.el	Thu Jun 14 00:09:10 2007 +0000
+++ b/lisp/emacs-lisp/edebug.el	Thu Jun 14 00:10:43 2007 +0000
@@ -369,7 +369,7 @@
   ;; 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 @@
 
 		  ;; 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)