diff options
| author | Adrian Bradd <adrian.bradd@gmail.com> | 2017-12-10 16:07:57 -0500 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2017-12-27 23:57:15 +0100 |
| commit | ff0f3e472348fbd3773905b87baa7419df86248f (patch) | |
| tree | 0bce1a36ddd30b2554b198d13336c00fcc842486 | |
| parent | f2c712a6a4aefef1e6cca794e76dc757cd4786cb (diff) | |
| download | org-mode-ff0f3e472348fbd3773905b87baa7419df86248f.tar.gz | |
Fix `org-todo'
* org.el (org-todo): Use marker `change-plist' position property to
permit triggering through "org-depend.el" with parent heading
statistics.
When TODO statistics in parent headings were updated it shifted the point
defining the :position property in `change-plist' causing headlines
with TRIGGER properties to fail to evaluate.
TINYCHANGE
| -rw-r--r-- | lisp/org.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org.el b/lisp/org.el index ad4b4ab..d02849d 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -12388,7 +12388,7 @@ When called through ELisp, arg is also interpreted in the following way: (or (looking-at (concat " +" org-todo-regexp "\\( +\\|[ \t]*$\\)")) (looking-at "\\(?: *\\|[ \t]*$\\)")) (let* ((match-data (match-data)) - (startpos (point-at-bol)) + (startpos (copy-marker (line-beginning-position))) (logging (save-match-data (org-entry-get nil "LOGGING" t t))) (org-log-done org-log-done) (org-log-repeat org-log-repeat) |