feature/popup: remove default slot & window-width
...and fix :popup not mapping the size parameter to the correct dimension when no side is specified.
This commit is contained in:
parent
25a2973c52
commit
84cba91e50
3 changed files with 6 additions and 6 deletions
|
@ -47,5 +47,7 @@ https://mediatemple.net"
|
||||||
"TODO")
|
"TODO")
|
||||||
|
|
||||||
(set! :popup "^\\*doom-regex\\*$" '((size . 4)) '((quit)))
|
(set! :popup "^\\*doom-regex\\*$" '((size . 4)) '((quit)))
|
||||||
(set! :popup "^\\*doom-regex-groups" '((side . left)) '((select) (quit)))
|
(set! :popup "^\\*doom-regex-groups"
|
||||||
|
'((side . left) (size . 28))
|
||||||
|
'((select) (quit)))
|
||||||
|
|
||||||
|
|
|
@ -67,9 +67,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-default-alist
|
(defvar +popup-default-alist
|
||||||
'((slot . 1)
|
'((window-height . 0.16)
|
||||||
(window-height . 0.14)
|
|
||||||
(window-width . 26)
|
|
||||||
(reusable-frames . visible))
|
(reusable-frames . visible))
|
||||||
"The default alist for `display-buffer-alist' rules.")
|
"The default alist for `display-buffer-alist' rules.")
|
||||||
|
|
||||||
|
@ -114,7 +112,7 @@ ALIST supports one custom parameter: `size', which will resolve to
|
||||||
(parameters ,parameters))
|
(parameters ,parameters))
|
||||||
,(when alist
|
,(when alist
|
||||||
`(when-let* ((size (cdr (assq 'size alist)))
|
`(when-let* ((size (cdr (assq 'size alist)))
|
||||||
(side (cdr (assq 'side (append alist +popup-default-alist)))))
|
(side (or (cdr (assq 'side (append alist +popup-default-alist))) 'bottom)))
|
||||||
(map-delete alist 'size)
|
(map-delete alist 'size)
|
||||||
(map-put alist (if (memq side '(left right))
|
(map-put alist (if (memq side '(left right))
|
||||||
'window-width
|
'window-width
|
||||||
|
|
|
@ -21,7 +21,7 @@
|
||||||
:commands pass
|
:commands pass
|
||||||
:config
|
:config
|
||||||
(set! :evil-state 'pass-mode 'emacs)
|
(set! :evil-state 'pass-mode 'emacs)
|
||||||
(set! :popup "^\\*Password-Store" '((side . left)) '((quit)))
|
(set! :popup "^\\*Password-Store" '((side . left) (size . 0.25)) '((quit)))
|
||||||
(map! :map pass-mode-map
|
(map! :map pass-mode-map
|
||||||
"j" #'pass-next-entry
|
"j" #'pass-next-entry
|
||||||
"k" #'pass-prev-entry
|
"k" #'pass-prev-entry
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue