feature/popup: remove eval-when-compile

This fixes void-variable errors when byte-compiling this module.
This commit is contained in:
Henrik Lissner 2018-03-01 23:41:43 -05:00
parent 7542f4a660
commit 9a1bf42075
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -145,7 +145,6 @@ ALIST supports one custom parameter: `size', which will resolve to
;; Default popup rules & bootstrap ;; Default popup rules & bootstrap
;; ;;
(eval-when-compile
(when (featurep! +all) (when (featurep! +all)
(set! :popup "^ \\*" '((slot . 1) (vslot . -1) (size . +popup-shrink-to-fit))) (set! :popup "^ \\*" '((slot . 1) (vslot . -1) (size . +popup-shrink-to-fit)))
(set! :popup "^\\*" '((slot . 1) (vslot . -1)) '((select . t)))) (set! :popup "^\\*" '((slot . 1) (vslot . -1)) '((select . t))))
@ -165,9 +164,6 @@ ALIST supports one custom parameter: `size', which will resolve to
'((select . t) (modeline . t) (quit) (transient . t))) '((select . t) (modeline . t) (quit) (transient . t)))
(set! :popup "^\\*\\(?:\\(?:Pp E\\|doom e\\)val\\)" (set! :popup "^\\*\\(?:\\(?:Pp E\\|doom e\\)val\\)"
'((size . +popup-shrink-to-fit)) '((transient . 0) (select . ignore)))) '((size . +popup-shrink-to-fit)) '((transient . 0) (select . ignore))))
nil)
(setq +popup--display-buffer-alist (eval-when-compile +popup--display-buffer-alist))
(add-hook 'doom-init-ui-hook #'+popup-mode) (add-hook 'doom-init-ui-hook #'+popup-mode)
(add-hook! '+popup-buffer-mode-hook #'(+popup|adjust-fringes +popup|set-modeline)) (add-hook! '+popup-buffer-mode-hook #'(+popup|adjust-fringes +popup|set-modeline))