[nongnu] elpa/org-tree-slide fb5d0a8c20 052/144: Support dark color theme

[ELPA Syncer]

branch: elpa/org-tree-slide
commit fb5d0a8c209d8851a7cad2468d6c8738b490e330
Author: yuuki arisawa <yuuki.ari@gmail.com>
Commit: yuuki arisawa <yuuki.ari@gmail.com>

    Support dark color theme
---
 org-tree-slide.el | 13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

diff --git a/org-tree-slide.el b/org-tree-slide.el
index 332595015c..5c6dbb0f74 100644
--- a/org-tree-slide.el
+++ b/org-tree-slide.el
@@ -533,15 +533,22 @@ Profiles:
   (set header-variable
        (if (re-search-forward regexp limit t) (match-string 1) nil)))
 
+(defface org-tree-slide-header-overlay-face
+  '((((class color) (background dark))
+     (:bold t :foreground "white" :background "black"))
+    (((class color) (background light))
+     (:bold t :foreground "black" :background "white"))
+    (t (:bold t :foreground "black" :background "white")))
+  "Face for ots-header-overlay")
+
 (defun ots-set-slide-header (brank-lines)
   (ots-hide-slide-header)
   (setq ots-header-overlay
        (make-overlay (point-min) (+ 1 (point-min))))
   (overlay-put ots-header-overlay 'after-string " ")
   (overlay-put ots-header-overlay
-              'face
-              '((foreground-color . "#696969")
-                (background-color . "#FFFFFF") bold))
+               'face
+               'org-tree-slide-header-overlay-face)
   (if org-tree-slide-header
       (overlay-put ots-header-overlay 'display
                   (concat "  [ "