Re: list-buffers - winwod-height

[Rares Vernica <rvernica@gmail.com>]

Thanks a lot,
Ray

Katsumi Yamaoka wrote:
>>>>>> In <e0rp4e$11a$1@news.service.uci.edu> Rares Vernica wrote:
> 
>> How can I set the default height of the list-buffers window?
> 
> There seems to be no way other than using your own command.
> How about this?
> 
> --8<---------------cut here---------------start------------->8---
> (setq my-list-buffers-window-height 16)
> 
> (defun my-list-buffers (&optional files-only)
>   (interactive "P")
>   (let ((buffer (list-buffers-noselect files-only)))
>     (display-buffer buffer)
>     (enlarge-window (max (- (window-height (get-buffer-window buffer))
> 			    my-list-buffers-window-height)
> 			 (- window-min-height (window-height))))))
> 
> (substitute-key-definition 'list-buffers 'my-list-buffers global-map)
> --8<---------------cut here---------------end--------------->8---
> 
> Otherwise, you can use the `special-display-buffer-names'
> variable if you'd like to pop up a frame.  For example:
> 
> (add-to-list 'special-display-buffer-names
> 	     '("*Buffer List*" (height . 16) (width . 80)))