emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/pdf-tools d976e47 5/6: Use theme background for tooltip ar


From: ELPA Syncer
Subject: [nongnu] elpa/pdf-tools d976e47 5/6: Use theme background for tooltip arrow
Date: Fri, 3 Dec 2021 10:58:21 -0500 (EST)

branch: elpa/pdf-tools
commit d976e47c39b620dcc16873a1a422943bace5f963
Author: JunyuanChen <75352049+JunyuanChen@users.noreply.github.com>
Commit: Vedang Manerikar <ved.manerikar@gmail.com>

    Use theme background for tooltip arrow
    
    If `pdf-view-themed-minor-mode' is active, use theme background for tooltip 
arrow (background) instead of white.
---
 lisp/pdf-util.el | 11 +++++++----
 1 file 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))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]