diff options
| author | JunyuanChen <75352049+JunyuanChen@users.noreply.github.com> | 2021-11-01 21:22:53 +0000 |
|---|---|---|
| committer | Vedang Manerikar <ved.manerikar@gmail.com> | 2021-11-10 10:24:07 +0530 |
| commit | d976e47c39b620dcc16873a1a422943bace5f963 (patch) | |
| tree | 54b8280869413f747c959338af6bc2ca9a2641ef | |
| parent | 2a07329f7bb753cd31e2f01193eb1c46b4b582f0 (diff) | |
Use theme background for tooltip arrow
If `pdf-view-themed-minor-mode' is active, use theme background for tooltip arrow (background) instead of white.
| -rw-r--r-- | lisp/pdf-util.el | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/lisp/pdf-util.el b/lisp/pdf-util.el index 23945c8..d8691be 100644 --- a/lisp/pdf-util.el +++ b/lisp/pdf-util.el @@ -391,7 +391,7 @@ values." list-of-syms)) ,@body)))) - + ;; * ================================================================== * ;; * Scrolling ;; * ================================================================== * @@ -725,9 +725,12 @@ string." 'face `(:foreground "orange red" :background - ,(if (bound-and-true-p pdf-view-midnight-minor-mode) - (cdr pdf-view-midnight-colors) - "white")))) + ,(cond + ((bound-and-true-p pdf-view-midnight-minor-mode) + (cdr pdf-view-midnight-colors)) + ((bound-and-true-p pdf-view-themed-minor-mode) + (face-background 'default nil)) + (t "white"))))) dx dy))) (defvar pdf-util--face-colors-cache (make-hash-table)) |