feature/syntax-checker: new +childframe flag for popups

This commit is contained in:
Henrik Lissner 2018-05-09 11:26:06 +02:00
parent a34489356e
commit 30e0ab6aef
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
4 changed files with 15 additions and 4 deletions

View file

@ -2,7 +2,9 @@
(defun +syntax-checker-show-popup (errors)
"TODO"
(if (and EMACS26+ (display-graphic-p))
(if (and EMACS26+
(featurep! +childframe)
(display-graphic-p))
(flycheck-posframe-show-posframe errors)
(flycheck-popup-tip-show-popup errors)))
@ -16,6 +18,9 @@
"TODO"
:lighter nil
:group 'doom
(if (featurep! +childframe)
(require 'flycheck-posframe)
(require 'flycheck-popup-tip))
(let ((hooks '(post-command-hook focus-out-hook)))
(cond
;; Use our display function and remember the old one but only if we haven't