Fix with-popup-rules! macro
This commit is contained in:
parent
b1ab80ec3f
commit
90ddc67337
1 changed files with 1 additions and 1 deletions
|
@ -474,7 +474,7 @@ should match the arguments of `+popup-define' or the :popup setting."
|
||||||
(declare (indent defun))
|
(declare (indent defun))
|
||||||
`(let ((+popup--display-buffer-alist +popup--old-display-buffer-alist)
|
`(let ((+popup--display-buffer-alist +popup--old-display-buffer-alist)
|
||||||
display-buffer-alist)
|
display-buffer-alist)
|
||||||
,@(cl-loop for rule in rules collect `(+popup-define ,@rule))
|
,@(cl-loop for rule in rules collect `(set! :popup ,@rule))
|
||||||
(when (bound-and-true-p +popup-mode)
|
(when (bound-and-true-p +popup-mode)
|
||||||
(setq display-buffer-alist +popup--display-buffer-alist))
|
(setq display-buffer-alist +popup--display-buffer-alist))
|
||||||
,@body))
|
,@body))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue