Mercurial > emacs
comparison lisp/emacs-lisp/edebug.el @ 76782:f960587873db
(edebug-display): Don't go to edebug-outside-buffer if it is dead.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 28 Mar 2007 13:23:42 +0000 |
parents | 872a30c0f872 |
children | 4ae89136374d 4ef881a120fe |
comparison
equal
deleted
inserted
replaced
76781:99550c24170f | 76782:f960587873db |
---|---|
2753 (if (edebug-window-live-p edebug-outside-window) | 2753 (if (edebug-window-live-p edebug-outside-window) |
2754 (select-window edebug-outside-window)) | 2754 (select-window edebug-outside-window)) |
2755 ) ; if edebug-save-windows | 2755 ) ; if edebug-save-windows |
2756 | 2756 |
2757 ;; Restore current buffer always, in case application needs it. | 2757 ;; Restore current buffer always, in case application needs it. |
2758 (set-buffer edebug-outside-buffer) | 2758 (if (buffer-name edebug-outside-buffer) |
2759 (set-buffer edebug-outside-buffer)) | |
2759 ;; Restore point, and mark. | 2760 ;; Restore point, and mark. |
2760 ;; Needed even if restoring windows because | 2761 ;; Needed even if restoring windows because |
2761 ;; that doesn't restore point and mark in the current buffer. | 2762 ;; that doesn't restore point and mark in the current buffer. |
2762 ;; But don't restore point if edebug-buffer is current buffer. | 2763 ;; But don't restore point if edebug-buffer is current buffer. |
2763 (if (not (eq edebug-buffer edebug-outside-buffer)) | 2764 (if (not (eq edebug-buffer edebug-outside-buffer)) |