unofficial mirror of help-gnu-emacs@gnu.org
 help / color / mirror / Atom feed
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

      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).