Debugger entered--Lisp error: (void-function org-inhibit-invisibility) (org-inhibit-invisibility) (let* ((buffer-invisibility-spec (org-inhibit-invisibility)) (beg (condition-case nil (progn (outline-back-to-heading) (point)) (error (point-min)))) (end (move-marker (make-marker) (progn (or (outline-get-next-sibling) (goto-char (point-max))) (point)))) (re "\\(\\[[0-9]*%\\]\\)\\|\\(\\[[0-9]*/[0-9]*\\]\\)") (re-box "^[ ]*\\(*+\\|[-+*]\\|[0-9]+[.)]\\) +\\(\\[[- X]\\]\\)") b1 e1 f1 c-on c-off lim (cstat 0)) (if all (progn (goto-char (point-min)) (or (outline-get-next-sibling) (goto-char (point-max))) (setq beg (point) end (point-max)))) (goto-char beg) (while (re-search-forward re end t) (setq cstat (1+ cstat) b1 (match-beginning 0) e1 (match-end 0) f1 (match-beginning 1) lim (cond ((org-on-heading-p) (or (outline-get-next-sibling) (goto-char (point-max))) (point)) ((org-at-item-p) (org-end-of-item) (point)) (t nil)) c-on 0 c-off 0) (goto-char e1) (if lim (progn (while (re-search-forward re-box lim t) (if (member (match-string 2) (quote ...)) (setq c-off (1+ c-off)) (setq c-on (1+ c-on)))) (goto-char b1) (insert (if f1 (format "[%d%%]" (/ ... ...)) (format "[%d/%d]" c-on (+ c-on c-off)))) (and (looking-at "\\[.*?\\]") (replace-match ""))))) (if (interactive-p) (progn (message "Checkbox statistics updated %s (%d places)" (if all "in entire file" "in current outline entry") cstat)))) (save-excursion (let* ((buffer-invisibility-spec (org-inhibit-invisibility)) (beg (condition-case nil (progn (outline-back-to-heading) (point)) (error (point-min)))) (end (move-marker (make-marker) (progn (or (outline-get-next-sibling) (goto-char ...)) (point)))) (re "\\(\\[[0-9]*%\\]\\)\\|\\(\\[[0-9]*/[0-9]*\\]\\)") (re-box "^[ ]*\\(*+\\|[-+*]\\|[0-9]+[.)]\\) +\\(\\[[- X]\\]\\)") b1 e1 f1 c-on c-off lim (cstat 0)) (if all (progn (goto-char (point-min)) (or (outline-get-next-sibling) (goto-char (point-max))) (setq beg (point) end (point-max)))) (goto-char beg) (while (re-search-forward re end t) (setq cstat (1+ cstat) b1 (match-beginning 0) e1 (match-end 0) f1 (match-beginning 1) lim (cond ((org-on-heading-p) (or (outline-get-next-sibling) (goto-char ...)) (point)) ((org-at-item-p) (org-end-of-item) (point)) (t nil)) c-on 0 c-off 0) (goto-char e1) (if lim (progn (while (re-search-forward re-box lim t) (if (member ... ...) (setq c-off ...) (setq c-on ...))) (goto-char b1) (insert (if f1 (format "[%d%%]" ...) (format "[%d/%d]" c-on ...))) (and (looking-at "\\[.*?\\]") (replace-match ""))))) (if (interactive-p) (progn (message "Checkbox statistics updated %s (%d places)" (if all "in entire file" "in current outline entry") cstat))))) wicked/org-update-checkbox-count(nil) ad-Advice-org-update-checkbox-count((closure (t) (&optional all) "Update the checkbox statistics in the current section.\n\nThis will find all statistic cookies like [57%] and [6/12] and\nupdate them with the current numbers.\n\nWith optional prefix argument ALL, do this for the whole buffer." (interactive "P") (save-excursion (save-restriction (widen) (let* ((cookie-re "\\(\\(\\[[0-9]*%\\]\\)\\|\\(\\[[0-9]*/[0-9]*\\]\\)\\)") (box-re "^[ ]*\\([-+*]\\|\\([0-9]+\\|[A-Za-z]\\)[.)]\\)[ ]+\\(?:address@hidden(?:start:\\)?\\([0-9]+\\|[A-Za-z]\\)\\][ ]*\\)?\\(\\[[- X]\\]\\)") (recursivep (or ... ...)) (within-inlinetask (and ... ... ...)) (end (cond ... ... ...)) (count-boxes (function ...)) cookies-list cache) (cond (all (goto-char ...)) (within-inlinetask (org-back-to-heading t)) (t (progn ... ... ... ... ...))) (while (re-search-forward cookie-re end t) (let (...) (if ... ...))) (let ((--dolist-tail-- cookies-list)) (while --dolist-tail-- (let ... ... ...)))))))) apply(ad-Advice-org-update-checkbox-count (closure (t) (&optional all) "Update the checkbox statistics in the current section.\n\nThis will find all statistic cookies like [57%] and [6/12] and\nupdate them with the current numbers.\n\nWith optional prefix argument ALL, do this for the whole buffer." (interactive "P") (save-excursion (save-restriction (widen) (let* ((cookie-re "\\(\\(\\[[0-9]*%\\]\\)\\|\\(\\[[0-9]*/[0-9]*\\]\\)\\)") (box-re "^[ ]*\\([-+*]\\|\\([0-9]+\\|[A-Za-z]\\)[.)]\\)[ ]+\\(?:address@hidden(?:start:\\)?\\([0-9]+\\|[A-Za-z]\\)\\][ ]*\\)?\\(\\[[- X]\\]\\)") (recursivep (or ... ...)) (within-inlinetask (and ... ... ...)) (end (cond ... ... ...)) (count-boxes (function ...)) cookies-list cache) (cond (all (goto-char ...)) (within-inlinetask (org-back-to-heading t)) (t (progn ... ... ... ... ...))) (while (re-search-forward cookie-re end t) (let (...) (if ... ...))) (let ((--dolist-tail-- cookies-list)) (while --dolist-tail-- (let ... ... ...))))))) nil) org-update-checkbox-count() org-capture-finalize(nil) funcall-interactively(org-capture-finalize nil) call-interactively(org-capture-finalize nil nil) command-execute(org-capture-finalize)