[PATCH] New function org-reset-checkbox-state which always clears the checkboxes

[PATCH] New function org-reset-checkbox-state which always clears the checkboxes

[Bernt Hansen]

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

Re: [PATCH] New function org-reset-checkbox-state which always clears the checkboxes

[Carsten Dominik]

Applied, thanks.

Maybe we should move this function into org-list.el.

- Carsten

On Apr 24, 2009, at 3:28 PM, Bernt Hansen wrote:

> 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

Re: [PATCH] New function org-reset-checkbox-state which always clears the checkboxes

[Bernt Hansen]

Carsten Dominik <carsten.dominik@gmail.com> writes:

> Applied, thanks.
>
> Maybe we should move this function into org-list.el.

Sure if that makes sense.  I just refactored it in place without
thinking about where it should really live.

-Bernt

Re: [PATCH] New function org-reset-checkbox-state which always clears the checkboxes

[Carsten Dominik]

On Apr 24, 2009, at 5:48 PM, Bernt Hansen wrote:

> Carsten Dominik <carsten.dominik@gmail.com> writes:
>
>> Applied, thanks.
>>
>> Maybe we should move this function into org-list.el.
>
> Sure if that makes sense.  I just refactored it in place without
> thinking about where it should really live.


I have renamed the function to `org-reset-checkbox-state-subtree'
and moved it to org-list.el.  You may need to update your key
bindings as the name has changed.

- Carsten