From: Juri Linkov <juri@linkov.net>
To: martin rudalics <rudalics@gmx.at>
Cc: 35592@debbugs.gnu.org
Subject: bug#35592: Use display-buffer-in-direction for completion-like windows
Date: Tue, 21 May 2019 23:18:30 +0300 [thread overview]
Message-ID: <87ef4ry31l.fsf@mail.linkov.net> (raw)
In-Reply-To: <2ab60f7d-764b-3d14-ba6a-c53e712ed71e@gmx.at> (martin rudalics's message of "Tue, 21 May 2019 09:32:43 +0200")
[-- Attachment #1: Type: text/plain, Size: 234 bytes --]
> 'display-buffer-in-direction' doesn't yet process 'window-min-height'
> (and 'window-min-width') entries correctly. I still have to set up
> semantics for these ...
Meanwhile I'm trying to use the new function and it works fine:
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: display-buffer-in-direction-use.patch --]
[-- Type: text/x-diff, Size: 1339 bytes --]
diff --git a/lisp/proced.el b/lisp/proced.el
index ce379a7c6a..b05046bfbd 100644
--- a/lisp/proced.el
+++ b/lisp/proced.el
@@ -1744,9 +1744,10 @@ proced-with-processes-buffer
(save-window-excursion
;; Analogous to `dired-pop-to-buffer'
;; Don't split window horizontally. (Bug#1806)
- (let (split-width-threshold)
- (pop-to-buffer (current-buffer)))
- (fit-window-to-buffer (get-buffer-window) nil 1)
+ (display-buffer (current-buffer)
+ '(display-buffer-in-direction
+ (direction . bottom)
+ (window-height . fit-window-to-buffer)))
,@body))))
(defun proced-send-signal (&optional signal process-alist)
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 713c8575c7..a6420c42c0 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -251,7 +251,10 @@ widget-choose
(define-key map [?\M--] 'negative-argument)
(save-window-excursion
(let ((buf (get-buffer " widget-choose")))
- (fit-window-to-buffer (display-buffer buf))
+ (display-buffer buf
+ '(display-buffer-in-direction
+ (direction . bottom)
+ (window-height . fit-window-to-buffer)))
(let ((cursor-in-echo-area t)
(arg 1))
(while (not value)
next prev parent reply other threads:[~2019-05-21 20:18 UTC|newest]
Thread overview: 20+ messages / expand[flat|nested] mbox.gz Atom feed top
2019-05-05 20:40 bug#35592: Use display-buffer-in-direction for completion-like windows Juri Linkov
2019-05-07 8:14 ` martin rudalics
2019-05-07 21:30 ` Juri Linkov
2019-05-08 9:09 ` martin rudalics
2019-05-08 19:32 ` Juri Linkov
2019-05-09 8:12 ` martin rudalics
2019-05-09 19:50 ` Juri Linkov
2019-05-10 5:34 ` Eli Zaretskii
2019-05-11 20:48 ` Juri Linkov
2019-05-12 2:31 ` Eli Zaretskii
2019-05-12 19:17 ` Juri Linkov
2019-05-19 9:17 ` martin rudalics
2019-05-19 19:54 ` Juri Linkov
2019-05-20 8:25 ` martin rudalics
2019-05-20 20:36 ` Juri Linkov
2019-05-21 7:32 ` martin rudalics
2019-05-21 20:18 ` Juri Linkov [this message]
2019-05-22 8:31 ` martin rudalics
2019-06-05 20:57 ` Juri Linkov
2019-05-19 9:17 ` martin rudalics
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=87ef4ry31l.fsf@mail.linkov.net \
--to=juri@linkov.net \
--cc=35592@debbugs.gnu.org \
--cc=rudalics@gmx.at \
/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.