From: Kevin Rodgers <ihs_4664@yahoo.com>
Subject: Re: list-buffers - winwod-height
Date: Wed, 05 Apr 2006 09:15:01 -0600 [thread overview]
Message-ID: <e10mv1$dkh$1@sea.gmane.org> (raw)
In-Reply-To: <e0uv1f$l29$1@news.service.uci.edu>
Rares Vernica wrote:
> I guess I can extend this to other secondary buffers, like *Help* or
> *Python Output*.
>
> Is there a way to uniformly specify the default height of a secondary
> buffer like these?
The best way is to display them in their own frame as Katsumi suggested.
For uniformity, put only the buffer names in special-display-buffer-names,
and put the frame parameters in special-display-frame-alist.
> Kevin Rodgers wrote:
>
>> 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)))
>>
>>
>> Here's another way to implement that:
>>
>> (defvar list-buffers-window-height 16)
>>
>> (defadvice list-buffers (after window-height activate)
>> "Make the *Buffer List* window `list-buffers-window-height' lines
>> high."
>> (when (interactive-p)
>> (enlarge-window (max (- (window-height (get-buffer-window "*Buffer
>> List*"))
>> list-buffers-window-height)
>> (- window-min-height (window-height))))))
>>
>>
--
Kevin Rodgers
prev parent reply other threads:[~2006-04-05 15:15 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
2006-04-03 18:22 list-buffers - winwod-height Rares Vernica
2006-04-04 1:11 ` Katsumi Yamaoka
2006-04-04 1:35 ` Rares Vernica
2006-04-04 16:38 ` Kevin Rodgers
[not found] ` <mailman.36.1144168815.9609.help-gnu-emacs@gnu.org>
2006-04-04 23:21 ` Rares Vernica
2006-04-05 15:15 ` Kevin Rodgers [this message]
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to='e10mv1$dkh$1@sea.gmane.org' \
--to=ihs_4664@yahoo.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).