Function: todo-update-count

todo-update-count is a byte-compiled function defined in todo-mode.el.gz.

Signature

(todo-update-count TYPE INCREMENT &optional CATEGORY)

Documentation

Change count of TYPE items in CATEGORY by integer INCREMENT.

With nil or omitted CATEGORY, default to the current category.

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/todo-mode.el.gz
(defun todo-update-count (type increment &optional category)
  "Change count of TYPE items in CATEGORY by integer INCREMENT.
With nil or omitted CATEGORY, default to the current category."
  (let* ((cat (or category (todo-current-category)))
	 (counts (cdr (assoc cat todo-categories)))
	 (idx (cond ((eq type 'todo) 0)
		    ((eq type 'diary) 1)
		    ((eq type 'done) 2)
		    ((eq type 'archived) 3))))
    (aset counts idx (+ increment (aref counts idx)))))