Mercurial > emacs
changeset 57528:c39903008a0d
(cvs-bury-buffer): Don't call get-buffer-window for effect.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 16 Oct 2004 15:35:11 +0000 |
| parents | 21785c190853 |
| children | 6ef9b12e5d13 |
| files | lisp/pcvs-util.el |
| diffstat | 1 files changed, 6 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/pcvs-util.el Sat Oct 16 15:33:59 2004 +0000 +++ b/lisp/pcvs-util.el Sat Oct 16 15:35:11 2004 +0000 @@ -104,11 +104,12 @@ (condition-case () (delete-window win) (error (iconify-frame (window-frame win)))) - (if (and mainbuf (get-buffer-window mainbuf)) - ;; FIXME: if the buffer popped into a pre-existing window, - ;; we don't want to delete that window. - t ;;(delete-window win) - )))) +;;; (if (and mainbuf (get-buffer-window mainbuf)) +;;; ;; FIXME: if the buffer popped into a pre-existing window, +;;; ;; we don't want to delete that window. +;;; t ;;(delete-window win) +;;; ) + ))) (with-current-buffer buf (bury-buffer (unless (and (eq buf (window-buffer (selected-window))) (not (window-dedicated-p (selected-window))))