[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: resize remaining buffer after kill buffer
From: |
Joakim Hove |
Subject: |
Re: resize remaining buffer after kill buffer |
Date: |
Mon, 11 Aug 2003 15:38:01 +0200 |
User-agent: |
Gnus/5.1003 (Gnus v5.10.3) Emacs/21.2 (gnu/linux) |
Homunkulus@gmx.net (Torsten Müller) writes:
> So, my dream is something like this:
> (defun kill-this-buffer-and-window ()
> "Kill the current buffer and delete the selected window."
> (interactive)
> (let (buffer current-buffer)
> (kill-buffer buffer)
> (if (> (count-windows) 1)
> (delete-window (selected-window)))
> )
> )
Well, this looks nice to me - so then "your dream is fulfilled" - or?
The implementation above does not let you choose the buffer to kill,
but I agree with you that that is a quite stupid choise to get anyway.
One final tip: (kill-buffer) returns true if the buffer is actually
killed, nil otherwise. So you *could* wrap the (delete-window ) call a
bit:
;;...
(if (kill-buffer (current-buffer))
(if (> (count-windows) 1)
(delete-window (selected-window))))
Joakim
--
/--------------------------------------------------------------------\
/ Joakim Hove / hove@bccs.no / (55 5) 84076 | \
| Unifob AS, Avdeling for Beregningsvitenskap (BCCS) | Stabburveien 18 |
| CMU | 5231 Paradis |
\ Thormøhlensgt.55, 5020 Bergen. | 55 91 28 18 /
\--------------------------------------------------------------------/