[Top][All Lists]
[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-----
- cvs-bury-buffer: use quit-window instead of bury-buffer,
Sam Steingold <=