Function: todo-completing-read

todo-completing-read is a byte-compiled function defined in otodo-mode.el.gz.

Signature

(todo-completing-read)

Documentation

Return a category name, with completion, for use in Todo mode.

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/otodo-mode.el.gz
(defun todo-completing-read ()
  "Return a category name, with completion, for use in Todo mode."
  ;; make a copy of todo-categories in case history-delete-duplicates is
  ;; non-nil, which makes completing-read alter todo-categories
  (let* ((categories (copy-sequence todo-categories))
	 (history (cons 'todo-categories (1+ todo-category-number)))
	 (default (nth todo-category-number todo-categories))
	 (category (completing-read
		    (concat "Category [" default "]: ")
		    todo-categories nil nil nil history default)))
    ;; restore the original value of todo-categories
    (setq todo-categories categories)
    category))