[nongnu] elpa/dslide 50e2a8ca37 009/230: use before-string instead of display for header

[ELPA Syncer]

branch: elpa/dslide
commit 50e2a8ca37b9475f5b3d2038d97a7ac9b4ea784e
Author: Psionik K <73710933+psionic-k@users.noreply.github.com>
Commit: Psionik K <73710933+psionic-k@users.noreply.github.com>

    use before-string instead of display for header
    
    Using 'display was making the level 1 header bullets invisible.  Instead of
    using display, we can use before-string, which will not affect the text 
under
    the overlay.
    
    The before string will not be formatted by 
org-tree-slide-header-overlay-face so
    this will need to be replaced.  Customization of header text will be 
replaced in
    a future commit to re-enable org-tree-slide-header-overlay-face
---
 org-tree-slide.el | 8 ++------
 1 file changed, 2 insertions(+), 6 deletions(-)

diff --git a/org-tree-slide.el b/org-tree-slide.el
index a8ce1b2e1b..523b432ea8 100644
--- a/org-tree-slide.el
+++ b/org-tree-slide.el
@@ -899,12 +899,8 @@ Some number of BLANK-LINES will be shown below the header."
   (org-tree-slide--hide-slide-header)
   (setq org-tree-slide--header-overlay
         (make-overlay (point-min) (+ 1 (point-min))))
-  (overlay-put org-tree-slide--header-overlay 'after-string " ")
-  (overlay-put org-tree-slide--header-overlay
-               'face
-               'org-tree-slide-header-overlay-face)
   (if org-tree-slide-header
-      (overlay-put org-tree-slide--header-overlay 'display
+      (overlay-put org-tree-slide--header-overlay 'before-string
                    (concat (if org-tree-slide-title org-tree-slide-title
                              (buffer-name))
                            "\n"
@@ -921,7 +917,7 @@ Some number of BLANK-LINES will be shown below the header."
                              (concat "\n" (org-tree-slide--get-parents
                                            org-tree-slide-breadcrumbs)))
                            (org-tree-slide--get-blank-lines blank-lines)))
-    (overlay-put org-tree-slide--header-overlay 'display
+    (overlay-put org-tree-slide--header-overlay 'before-string
                  (org-tree-slide--get-blank-lines blank-lines))))
 
 (defun org-tree-slide--get-blank-lines (lines)