Bläddra i källkod

org-element-headline-parser: Fix headings like * COMMENTnospace

* lisp/org-element.el (org-element-headline-parser): Do not parse
headings like * COMMENTnospace as commented.
Ihor Radchenko 2 år sedan
förälder
incheckning
8a0b03fb3b
1 ändrade filer med 3 tillägg och 1 borttagningar
  1. 3 1
      lisp/org-element.el

+ 3 - 1
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:"