emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Rename +popup-display-buffer

Browse source 
To +popup-display-buffer-stacked-side-window, to make it more obvious
what it actually does.
This commit is contained in:
Henrik Lissner 2018-06-17 02:03:05 +02:00
parent c3988a8298
commit 1eae57a0b4
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
3 changed files with 8 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

8
modules/ui/popup/+hacks.el
View file

@ -168,7 +168,7 @@ the command buffer."
;; `helm' ;; `helm'
(after! helm (after! helm
(setq helm-default-display-buffer-functions '(+popup-display-buffer)) (setq helm-default-display-buffer-functions '(+popup-display-buffer-stacked-side-window))
(set-popup-rule! "^\\*helm" :ignore t)) (set-popup-rule! "^\\*helm" :ignore t))
@ -260,13 +260,13 @@ instead of switch-to-buffer-*."
;; `pdf-tools' ;; `pdf-tools'
(after! pdf-tools (after! pdf-tools
(setq tablist-context-window-display-action (setq tablist-context-window-display-action
'((+popup-display-buffer) '((+popup-display-buffer-stacked-side-window)
(side . left) (side . left)
(slot . 2) (slot . 2)
(window-height . 0.3) (window-height . 0.3)
(inhibit-same-window . t)) (inhibit-same-window . t))
pdf-annot-list-display-buffer-action pdf-annot-list-display-buffer-action
'((+popup-display-buffer) '((+popup-display-buffer-stacked-side-window)
(side . left) (side . left)
(slot . 3) (slot . 3)
(inhibit-same-window . t))) (inhibit-same-window . t)))
@ -290,7 +290,7 @@ instead of switch-to-buffer-*."
(lambda (act-popup-dim) (lambda (act-popup-dim)
(cl-letf (((symbol-function 'display-buffer-in-side-window) (cl-letf (((symbol-function 'display-buffer-in-side-window)
(lambda (buffer alist) (lambda (buffer alist)
(+popup-display-buffer (+popup-display-buffer-stacked-side-window
buffer (append '((vslot . -9999)) alist))))) buffer (append '((vslot . -9999)) alist)))))
(which-key--show-buffer-side-window act-popup-dim)))) (which-key--show-buffer-side-window act-popup-dim))))

6
modules/ui/popup/autoload/popup.el
View file

@ -574,10 +574,10 @@ and may be called only if no window on SIDE exists yet."
(advice-add #'window--sides-check :override #'ignore)) (advice-add #'window--sides-check :override #'ignore))
;;;###autoload ;;;###autoload
(defun +popup-display-buffer (buffer alist) (defun +popup-display-buffer-stacked-side-window (buffer alist)
"A `display-buffer' action that serves as an alternative to "A `display-buffer' action that serves as an alternative to
`display-buffer-in-side-window', but allows for stacking popups not only `display-buffer-in-side-window', but allows for stacking popups with the `vslot'
laterally with the `vslot' alist entry. alist entry.
Accepts the same arguments as `display-buffer-in-side-window'. You must set Accepts the same arguments as `display-buffer-in-side-window'. You must set
`window--sides-inhibit-check' to non-nil for this work properly." `window--sides-inhibit-check' to non-nil for this work properly."

2
modules/ui/popup/config.el
View file

@ -79,7 +79,7 @@ a brief description of some native window parameters that Emacs uses:
`pop-to-buffer'. Doom popups sets this. The default is nil.") `pop-to-buffer'. Doom popups sets this. The default is nil.")
(defvar +popup-display-buffer-actions (defvar +popup-display-buffer-actions
'(display-buffer-reuse-window +popup-display-buffer) '(display-buffer-reuse-window +popup-display-buffer-stacked-side-window)
"The functions to use to display the popup buffer.") "The functions to use to display the popup buffer.")
(defvar +popup-default-alist (defvar +popup-default-alist