[elpa] externals/org a3d9999d28 2/3: lisp/org.el: Match COMMENT in `org-complex-heading-regexp-format'

[ELPA Syncer]

branch: externals/org
commit a3d9999d286cab167c0fa3ec5a44cb6a936f2dfc
Author: Ignacio <ignaciocasso@hotmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>

    lisp/org.el: Match COMMENT in `org-complex-heading-regexp-format'
    
    * lisp/org.el (org-set-regexps-and-options): Change
    `org-complex-heading-regexp-format' initialization so that the regexp
    it produces also matches a headline if it is commented.
    
    TINYCHANGE
---
 lisp/org.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/org.el b/lisp/org.el
index 1d5fc39038..cab59b87cb 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -3846,7 +3846,8 @@ expected to be bound to nil when matching against this 
regexp.")
   "Printf format to make regexp to match an exact headline.
 This regexp will match the headline of any node which has the
 exact headline text that is put into the format, but may have any
-TODO state, priority and tags.")
+TODO state, priority, tags, statistics cookies (at the beginning
+or end of the headline title), or COMMENT keyword.")
 
 (defvar-local org-todo-line-tags-regexp nil
   "Matches a headline and puts TODO state into group 2 if present.
@@ -4213,6 +4214,8 @@ related expressions."
                      "\\(?: +" org-todo-regexp "\\)?"
                      "\\(?: +\\(\\[#.\\]\\)\\)?"
                      "\\(?: +"
+                      ;; Headline might be commented
+                      "\\(?:" org-comment-string " +\\)?"
                      ;; Stats cookies can be stuck to body.
                      "\\(?:\\[[0-9%%/]+\\] *\\)*"
                      "\\(%s\\)"