diff options
author | Nicolas Goaziou <n.goaziou@gmail.com> | 2011-07-18 15:10:42 +0200 |
---|---|---|
committer | Nicolas Goaziou <n.goaziou@gmail.com> | 2011-07-18 15:11:56 +0200 |
commit | ddec51af0f58e678af84c753da4065a9450c3ae5 (patch) | |
tree | 74bff0e9b40da8849bbcd890067963ce3f25f353 | |
parent | a161ecfd6acfd23f5cde94f8950484da75f1ca5c (diff) | |
download | org-mode-ddec51af0f58e678af84c753da4065a9450c3ae5.tar.gz |
Comment some code for posterity
-rw-r--r-- | lisp/org.el | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/lisp/org.el b/lisp/org.el index 30a1e1a..27be6a6 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -11331,6 +11331,16 @@ statistics everywhere." (save-excursion (beginning-of-line 1) (setq ltoggle (funcall outline-level)) + ;; Three situations are to consider: + + ;; 1. if `org-hierarchical-todo-statistics' is nil, repeat up + ;; to the top-level ancestor on the headline; + + ;; 2. If parent has "recursive" property, repeat up to the + ;; headline setting that property, taking inheritance into + ;; account; + + ;; 3. Else, move up to direct parent and proceed only once. (while (and (setq level (org-up-heading-safe)) (or recursive first) (>= (point) lim)) |