[nongnu] elpa/org-present 1b519cfd5a 27/47: Merge pull request #5 from fred-o/master

[ELPA Syncer]

branch: elpa/org-present
commit 1b519cfd5abf44bed307cac576dc9fd61eb2c35f
Merge: 03b23602d3 1af324f54f
Author: rlister <rlister+gh@gmail.com>
Commit: rlister <rlister+gh@gmail.com>

    Merge pull request #5 from fred-o/master
    
    hide emphasis markers when presenting
---
 org-present.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/org-present.el b/org-present.el
index 576e75f165..05e558a5be 100644
--- a/org-present.el
+++ b/org-present.el
@@ -175,7 +175,12 @@
     ;; hide stars in headings
     (goto-char (point-min))
     (while (re-search-forward "^\\(*+\\)" nil t)
-      (org-present-add-overlay (match-beginning 1) (match-end 1)))))
+      (org-present-add-overlay (match-beginning 1) (match-end 1)))
+    ;; hide emphasis markers
+    (goto-char (point-min))
+    (while (re-search-forward org-emph-re nil t)
+      (org-present-add-overlay (match-beginning 2) (1+ (match-beginning 2)))
+      (org-present-add-overlay (1- (match-end 2)) (match-end 2)))))
 
 (defun org-present-rm-overlays ()
   "Remove overlays for this mode."