From: Richard M. Stallman Date: Sat, 16 Oct 2004 15:35:11 +0000 (+0000) Subject: (cvs-bury-buffer): Don't call get-buffer-window for effect. X-Git-Tag: ttn-vms-21-2-B4~4541 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=931a33313e9d66037eb9ea50e854fe7028c0a8fe;p=emacs.git (cvs-bury-buffer): Don't call get-buffer-window for effect. --- diff --git a/lisp/pcvs-util.el b/lisp/pcvs-util.el index 5d9d0d215af..a4eda95e23e 100644 --- a/lisp/pcvs-util.el +++ b/lisp/pcvs-util.el @@ -104,11 +104,12 @@ BUF is assumed to be a temporary buffer used from the buffer MAINBUF." (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))))