Explorar o código

Parse titleless headlines with a tag correctly

* lisp/org-element.el (org-element-headline-parser): Do not treat tag
as headline title in headlines like "* :tag:".
Ihor Radchenko %!s(int64=4) %!d(string=hai) anos
pai
achega
32b9251886
Modificáronse 1 ficheiros con 4 adicións e 1 borrados
  1. 4 1
      lisp/org-element.el

+ 4 - 1
lisp/org-element.el

@@ -1021,7 +1021,10 @@ Assume point is at beginning of the headline."
 	   (commentedp
 	    (and (let (case-fold-search) (looking-at org-comment-string))
 		 (goto-char (match-end 0))))
-	   (title-start (point))
+	   (title-start (prog1 (point)
+                          (unless (or todo priority commentedp)
+                            ;; Headline like "* :tag:"
+                            (skip-syntax-backward " \t"))))
 	   (tags (when (re-search-forward
 			"[ \t]+\\(:[[:alnum:]_@#%:]+:\\)[ \t]*$"
 			(line-end-position)