[elpa] externals/org 8a0b03fb3b 1/7: org-element-headline-parser: Fix headings like * COMMENTnospace

[ELPA Syncer]

branch: externals/org
commit 8a0b03fb3bb3b76cb45a64f2bab5ad63a83b1b0d
Author: Ihor Radchenko <yantar92@gmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>

    org-element-headline-parser: Fix headings like * COMMENTnospace
    
    * lisp/org-element.el (org-element-headline-parser): Do not parse
    headings like * COMMENTnospace as commented.
---
 lisp/org-element.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/org-element.el b/lisp/org-element.el
index 59a7fd461b..63e7c56323 100644
--- a/lisp/org-element.el
+++ b/lisp/org-element.el
@@ -1095,7 +1095,9 @@ Assume point is at beginning of the headline."
           (commentedp
            (and (let ((case-fold-search nil))
                    (looking-at org-element-comment-string))
-                (goto-char (match-end 0))))
+                (goto-char (match-end 0))
+                 (when (looking-at-p "\\(?:[ \t]\\|$\\)")
+                   (point))))
           (title-start (prog1 (point)
                           (unless (or todo priority commentedp)
                             ;; Headline like "* :tag:"