diff options
author | Juanma Barranquero <lekktu@gmail.com> | 2007-06-14 00:10:43 +0000 |
---|---|---|
committer | Juanma Barranquero <lekktu@gmail.com> | 2007-06-14 00:10:43 +0000 |
commit | 1b96c77f465f44c1e8c83a46f4c9bd70098766d4 (patch) | |
tree | b2c5b5a68a1d54399fe7a221ea0e915771c256f1 /lisp/emacs-lisp | |
parent | 011acd1803f5771dc08899ca65aa7418c5d5e0de (diff) | |
download | emacs-1b96c77f465f44c1e8c83a46f4c9bd70098766d4.tar.gz emacs-1b96c77f465f44c1e8c83a46f4c9bd70098766d4.tar.bz2 emacs-1b96c77f465f44c1e8c83a46f4c9bd70098766d4.zip |
(edebug-pop-to-buffer, edebug-display): Remove redundant checks.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/edebug.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index 9ae33599f09..3d9e63bc802 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -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) |