Copying subtrees with checked off lists to create a new task would normally require the boxes to be unchecked. This function lets you easily clear all checkboxes in an entry without requiring the RESET_CHECK_BOXES property. --- This patch is available at git://git.norang.ca/org-mode.git for-carsten
contrib/lisp/org-checklist.el | 27 ++++++++++++++++----------- 1 files changed, 16 insertions(+), 11 deletions(-) diff --git a/contrib/lisp/org-checklist.el b/contrib/lisp/org-checklist.el index 9661b53..c3348bc 100644 --- a/contrib/lisp/org-checklist.el +++ b/contrib/lisp/org-checklist.el @@ -52,17 +52,22 @@ "Reset all checkboxes in an entry if the `RESET_CHECK_BOXES' property is set" (interactive "*") (if (org-entry-get (point) "RESET_CHECK_BOXES") - (save-restriction - (save-excursion - (org-narrow-to-subtree) - (org-show-subtree) - (goto-char (point-min)) - (let ((end (point-max))) - (while (< (point) end) - (when (org-at-item-checkbox-p) - (replace-match "[ ]" t t)) - (beginning-of-line 2)))) - (org-update-checkbox-count-maybe)))) + (org-reset-checkbox-state))) + +(defun org-reset-checkbox-state () + "Reset all checkboxes in an entry" + (interactive "*") + (save-restriction + (save-excursion + (org-narrow-to-subtree) + (org-show-subtree) + (goto-char (point-min)) + (let ((end (point-max))) + (while (< (point) end) + (when (org-at-item-checkbox-p) + (replace-match "[ ]" t t)) + (beginning-of-line 2)))) + (org-update-checkbox-count-maybe))) (defun org-make-checklist-export () "Produce a checklist containing all unchecked items from a list -- 1.6.3.rc1.34.g0be9b _______________________________________________ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode