Re: question about pop-to-buffer

[Thierry Volpiatto]

martin rudalics <address@hidden> writes:

>> how can I set pop-to-buffer action arg to create the new window on top
>> and not on bottom of current window and split the windows equally.
>
> Side windows serve a different purpose and don't care about the selected
> window.  Moreover you can't set their heights and widths individually:
> All side windows on the left or right get the same width once set, all
> side windows on the top or bottom have the same height.  And you
> currently can't set the size of the first window at some side because
> there's a bug in `display-buffer-in-major-side-window' :-(
>
> So in `display-buffer-in-major-side-window' you have to replace
>
>        (size (or (assq 'size alist)
>
> by
>
>        (size (or (cdr (assq 'size alist))
>
> and then use for example
>
> (pop-to-buffer
>  (get-buffer-create "*toto*")
>  `(display-buffer-in-side-window . ((side . top) (size . ,(/ 
> (window-total-size (selected-window)) 2)) (slot . 0))))
>
> which is clumsy and won't work if a window of that size exists already.
>
> Interpreting your request literally with "selected" substituting
> "current", I suppose the following should do what you want:
>
> (let ((split-window-preferred-function
>        #'(lambda (window) (split-window (selected-window)  nil 'above))))
>   (pop-to-buffer (get-buffer-create "*toto*")))
>
>> Also if I have two windows the second one is not reused, a new one is
>> created instead. (but maybe is what `display-buffer-in-side-window' for
>> ?)
>
> I suppose you have to customize `window-sides-slots' appropriately.

Many thanks to take the time to clarify all this.

-- 
  Thierry
Get my Gnupg key:
gpg --keyserver pgp.mit.edu --recv-keys 59F29997