emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

cvs-bury-buffer: use quit-window instead of bury-buffer


From: Sam Steingold
Subject: cvs-bury-buffer: use quit-window instead of bury-buffer
Date: Wed, 16 Apr 2008 13:20:43 -0400
User-agent: Thunderbird 2.0.0.0 (X11/20070326)

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

is it OK to apply this:

- --- pcvs-util.el.~1.37.~      2008-04-07 11:57:04.000000000 -0400
+++ pcvs-util.el        2008-04-16 13:11:10.000965000 -0400
@@ -102,20 +102,7 @@ BUF is assumed to be a temporary buffer
~     (let ((win (if (eq buf (window-buffer (selected-window)))
(selected-window)
~                (get-buffer-window buf t))))
~       (when win
- -     (if (window-dedicated-p win)
- -         (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)
- -;;;        )
- -       )))
- -    (with-current-buffer buf
- - (bury-buffer (unless (and (eq buf (window-buffer (selected-window)))
- -                             (not (window-dedicated-p (selected-window))))
- -                  buf)))
+        (quit-window nil win)))
~     (when mainbuf
~       (let ((mainwin (or (get-buffer-window mainbuf)
~                        (get-buffer-window mainbuf 'visible))))
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.6 (GNU/Linux)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

iD8DBQFIBjVrPp1Qsf2qnMcRAvCcAKCpSWXREiGtGujCMygzH2L1tqEBCACfYWp8
A50ame0AmbYr7AjyMQ8DW6w=
=IKeP
-----END PGP SIGNATURE-----





reply via email to

[Prev in Thread] Current Thread [Next in Thread]