tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

Fix bug with setting TODO state in folded tree

This commit is contained in:
Carsten Dominik 2009-10-20 09:27:23 +02:00
parent 063cb58fab
commit ae97ba6e14
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/org.el
View File

@ -9476,7 +9476,7 @@ For calling through lisp, arg is also interpreted in the following way:
(setq org-blocker-hook nil))
(save-excursion
(catch 'exit
(org-back-to-heading)
(org-back-to-heading t)
(if (looking-at outline-regexp) (goto-char (1- (match-end 0))))
(or (looking-at (concat " +" org-todo-regexp "\\( +\\|$\\)"))
(looking-at " *"))