[Feature request] Could you add support for quick-peek
Hello,
I use quick-peek
in flycheck-inline
to prettify my error messages. But the face of quick-peek
with modus-theme
is too distracting.
My code:
;; `quick-peek' is a inline pop-up library.
(use-package quick-peek
:straight t
:functions (quick-peek-show quick-peek-hide))
(use-package flycheck-inline
:straight t
:hook (flycheck-mode-hook . flycheck-inline-mode)
:custom ((flycheck-inline-display-function
(lambda (msg pos err)
(let* ((ov (quick-peek-overlay-ensure-at pos))
(contents (quick-peek-overlay-contents ov)))
(setf (quick-peek-overlay-contents ov)
(concat contents (when contents "\n") msg))
(quick-peek-update ov))))
(flycheck-inline-clear-function #'quick-peek-hide)))
It looks like this.
But it should actually be easier to distinguish, like this (I set custom colors).
And the code of above image.
(use-package quick-peek
:straight t
:functions (quick-peek-show quick-peek-hide)
:custom-face
(quick-peek-background-face ((t (:background "#dde3f4"))))
(quick-peek-padding-face ((t (:background "#dde3f4" :height 0.15))))
(quick-peek-border-face ((t (:background "#702d1f" :height 0.1)))))
I was going to create a PR for you, but I got lost in modus-themes-operandi-colors
, so I had to come and ask for your help.