Skip to content

Commit a3788bd

Browse files
committed
org-scan-tags: Fix messed match groups in eeb4fa8
* lisp/org.el (org-scan-tags): Match space after TODO keyword outside group and match the TODO-keyword in its own group.
1 parent 8151d52 commit a3788bd

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

lisp/org.el

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -10861,7 +10861,7 @@ headlines matching this string."
1086110861
;; Get the correct level to match
1086210862
(concat "\\*\\{" (number-to-string start-level) "\\} ")
1086310863
org-outline-regexp)
10864-
" *\\(" (regexp-opt org-todo-keywords-1) " \\)?"
10864+
" *\\(?:\\(" (regexp-opt org-todo-keywords-1 t) "\\) \\)?"
1086510865
" *\\(.*?\\)\\([ \t]:\\(?:" org-tag-re ":\\)+\\)?[ \t]*$"))
1086610866
(props (list 'face 'default
1086710867
'done-face 'org-agenda-done

0 commit comments

Comments
 (0)