[nongnu] elpa/org-present b5f5d5f351 04/47: add overlay for author/title pragmas

[ELPA Syncer]

branch: elpa/org-present
commit b5f5d5f35184e762b88c788e596f814fec27f665
Author: Richard Lister <rlister+gh@gmail.com>
Commit: Richard Lister <rlister+gh@gmail.com>

    add overlay for author/title pragmas
---
 org-present.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/org-present.el b/org-present.el
index 6ec10881bf..d477805e70 100644
--- a/org-present.el
+++ b/org-present.el
@@ -122,8 +122,12 @@
   (add-to-invisibility-spec 'org-present)
   (save-excursion
     (goto-char (point-min))
+    (while (re-search-forward "^\\(#\\+\\w+:\\)" nil t) ;make org-mode pragmas 
invisible
+      (overlay-put (make-overlay (match-beginning 1) (match-end 1)) 'invisible 
'org-present))
+    (goto-char (point-min))
     (while (re-search-forward "^\\(*+\\)" nil t) ;make stars in headers 
invisible
-      (overlay-put (make-overlay (match-beginning 1) (match-end 1)) 'invisible 
'org-present))))
+      (overlay-put (make-overlay (match-beginning 1) (match-end 1)) 'invisible 
'org-present))
+))
 
 (defun org-present-rm-overlays ()
   "Remove overlays for this mode."