Emacs TODO 相关配置

;;------------------- TODO -------------------

;;TODO-list
(setq org-todo-keywords
      '((sequence "TODO(t)" "InPROSESS(i)" "|" "DONE(d)")
        (sequence "REPORT(r)" "BUG(b)" "KNOWNCAUSE(k)" "|" "FIXED(f)")
        (sequence "|" "CANCELED(c)")))

;;当所有子项目都标记为Done的时候，父项目也被标记为Done
(defun org-summary-todo (n-done n-not-done)
  "Swith entry to DONE when all subentries are done, to TODO otherwise."
  (let (org-log-done org-log-states)   ; turn off logging.
    (org-todo (if (= n-not-done 0) "DONE" "TODO"))))
;;或
;
;** TODO Test [1/3]
;- [X] Only a test
;- [ ] It's another test
;- [ ] Third test
;
;C-c C-c 切换Check Box的状态
;M-S-Ret 插入新的check box item.

;;------------------- TODO -------------------