diff options
author | Bastien Guerry <bzg@altern.org> | 2012-12-31 09:03:27 +0100 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2012-12-31 09:29:45 +0100 |
commit | a62beff06dedc8075b0753ace670a26102d224ba (patch) | |
tree | 9063f4b7f1e1ee980867094c86550695c0d5c5e4 | |
parent | aa80e441dc828358b18698ff1df3f8c757495894 (diff) | |
download | org-mode-a62beff06dedc8075b0753ace670a26102d224ba.tar.gz |
org.el (org-ctrl-c-ctrl-c): Throw a user error when trying to toggle a blocked checkbox
* org.el (org-ctrl-c-ctrl-c): Throw a user error when trying
to toggle a blocked checkbox.
-rw-r--r-- | lisp/org.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/org.el b/lisp/org.el index a307ca6..2139c52 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -19122,8 +19122,10 @@ This command does many different things, depending on context: (org-list-struct-fix-ind struct parents) (setq block-item (org-list-struct-fix-box struct parents prevs orderedp))) - (org-list-struct-apply-struct struct old-struct) - (org-update-checkbox-count-maybe) + (if (equal struct old-struct) + (user-error "Cannot toggle this checkbox (unchecked subitems?)") + (org-list-struct-apply-struct struct old-struct) + (org-update-checkbox-count-maybe)) (when block-item (message "Checkboxes were removed due to unchecked box at line %d" |