Function: calendar-read

calendar-read is a byte-compiled function defined in calendar.el.gz.

This function is obsolete since 28.1; use calendar-read-sexp instead.

Signature

(calendar-read PROMPT ACCEPTABLE &optional INITIAL-CONTENTS)

Documentation

Return an object read from the minibuffer.

Prompt with the string PROMPT and use the function ACCEPTABLE to decide if entered item is acceptable. If non-nil, optional third arg INITIAL-CONTENTS is a string to insert in the minibuffer before reading.

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/calendar.el.gz
(defun calendar-read (prompt acceptable &optional initial-contents)
  "Return an object read from the minibuffer.
Prompt with the string PROMPT and use the function ACCEPTABLE to decide
if entered item is acceptable.  If non-nil, optional third arg
INITIAL-CONTENTS is a string to insert in the minibuffer before reading."
  (declare (obsolete calendar-read-sexp "28.1"))
  (let ((value (read-minibuffer prompt initial-contents)))
    (while (not (funcall acceptable value))
      (setq value (read-minibuffer prompt initial-contents)))
    value))