From: Jean Louis <bugs@gnu.support>
To: Help GNU Emacs <help-gnu-emacs@gnu.org>
Subject: How to force display-buffer-in-side-window to open side window on right?
Date: Thu, 02 Feb 2023 08:46:09 +0300 [thread overview]
Message-ID: <3edbaf19a5a823b6690efefbd9d56357.support1@rcdrun.com> (raw)
I am trying to make function to provide 2 buffers in 2 windows, side
by side.
(defun rcd-two-windows (buffer-left buffer-right &optional window-register)
"Display BUFFER-LEFT and BUFFER-RIGHT only.
Previous window configuration is saved register ?r or to optional
WINDOW-REGISTER.
Parent function may restore window configuration by using the
function `jump-to-register' with WINDOW-REGISTER as argument."
(cond ((and (buffer-live-p buffer-left) (buffer-live-p buffer-right))
(let ((register (or window-register ?r)))
(window-configuration-to-register register)
(switch-to-buffer buffer-left)
(delete-other-windows)
(display-buffer-in-side-window buffer-right '(side right))))
(t (user-error "Buffers `%s' and `%s' must be live" buffer-left buffer-right))))
However, with `emacs -Q' this below gives me window and smaller window
down on the bottom instead on right side
(let ((buffer-left (get-buffer-create "*My Left*"))
(buffer-right (get-buffer-create "*My Right*")))
(rcd-two-windows buffer-left buffer-right))
What am I doing wrong?
--
Jean
Take action in Free Software Foundation campaigns:
https://www.fsf.org/campaigns
In support of Richard M. Stallman
https://stallmansupport.org/
next reply other threads:[~2023-02-02 5:46 UTC|newest]
Thread overview: 3+ messages / expand[flat|nested] mbox.gz Atom feed top
2023-02-02 5:46 Jean Louis [this message]
2023-02-02 6:10 ` How to force display-buffer-in-side-window to open side window on right? Bruno Barbier
2023-02-02 19:38 ` Jean Louis
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
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=3edbaf19a5a823b6690efefbd9d56357.support1@rcdrun.com \
--to=bugs@gnu.support \
--cc=help-gnu-emacs@gnu.org \
/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.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.