branch: elpa/org-tree-slide
commit 871d75f872e0ca86a83489bee2c8ffc097bfccc0
Merge: a72f5d492d fca0042e0c
Author: Takaaki ISHIKAWA <taka@mba.local>
Commit: Takaaki ISHIKAWA <taka@mba.local>
Merge branch 'master' of github.com:takaxp/org-tree-slide
---
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 5c1bc7cf3b..75311e60b7 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 " [ "
