resize remaining buffer after kill buffer

resize remaining buffer after kill buffer

[Torsten Müller]

If I have two (or more) buffers visible and I kill one of these
buffers, the size of the remaining buffers is still as before. The
area of the disappeared buffer will then be filled by something else,
mostly the scratch buffer or something else which is normally _not_
interesting for me.

Is there any simple way to enlarge one of the remaining buffers by the
size of the just killed buffer?

T.M.

Re: resize remaining buffer after kill buffer

[Joakim Hove]

Homunkulus@gmx.net (Torsten Müller) writes:


> Is there any simple way to enlarge one of the remaining buffers by the
> size of the just killed buffer?

Hello,

I don't know if this is what you want but:

(defun kill-buffer-and-window (BUFFER)
  "Kills a buffer and the accompanying window. If the buffer is not
displayed in the active frame nothing happens to the window 
configuration"
  (interactive "bKill buffer:")
  (let ((window))
    (if (> (count-windows) 1)
	(setq window (get-buffer-window BUFFER)))
    (kill-buffer BUFFER)
    (if window
	(delete-window window))))
    
does something alike.

*Warning* After writing this function I discovered that there already
exists a built in function with the same name, however It seems the
built function does not allow you to select which buffer to kill. In
my implementation nothing happens if you kill a buffer which does not
occupy a window in the current frame.

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     /
  \--------------------------------------------------------------------/

Re: resize remaining buffer after kill buffer

[Torsten Müller]

Joakim Hove <hove@bccs.no> schrieb:

> *Warning* After writing this function I discovered that there
> already exists a built in function with the same name,

Oh. Indeed.

> however It seems the built function does not allow you to select
> which buffer to kill. In my implementation nothing happens if you
> kill a buffer which does not occupy a window in the current frame.

In my implementation this function seems to do everything right, even
with selection of the buffer. (I want always the buffer with the
cursor.)

Thanks for your code.

T.M.

Re: resize remaining buffer after kill buffer

[Torsten Müller]

Homunkulus@gmx.net (Torsten Müller) schrieb:

> Thanks for your code.

I experimented a bit with your code and with the other function having
the same name. The problem of the other function is that it doesn't
delete a buffer which has full size. But I want to have a function for
all purpuse use (on C-x k). 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)))
  )
)

T.M.

Re: resize remaining buffer after kill buffer

[Joakim Hove]

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     /
  \--------------------------------------------------------------------/

Re: resize remaining buffer after kill buffer

[Stefan Monnier]

> If I have two (or more) buffers visible and I kill one of these
> buffers, the size of the remaining buffers is still as before. The

Be careful to distinguish buffers and windows.
You're talking about the size of the window(s), not about the size of
the buffers.


        Stefan

Re: resize remaining buffer after kill buffer

[Kai Großjohann]

Homunkulus@gmx.net (Torsten Müller) writes:

> Is there any simple way to enlarge one of the remaining buffers by the
> size of the just killed buffer?

I think you want to kill the buffer and the window -- C-x 4 0.
-- 
Two cafe au lait please, but without milk.