From d976e47c39b620dcc16873a1a422943bace5f963 Mon Sep 17 00:00:00 2001
From: JunyuanChen <75352049+JunyuanChen@users.noreply.github.com>
Date: Mon, 1 Nov 2021 21:22:53 +0000
Subject: 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))
-- 
cgit v1.0