Function: read-multiple-choice--long-answers

read-multiple-choice--long-answers is a byte-compiled function defined in rmc.el.gz.

Signature

(read-multiple-choice--long-answers PROMPT CHOICES)

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/rmc.el.gz
(defun read-multiple-choice--long-answers (prompt choices)
  (let ((answer
         (completing-read
          (concat prompt " ("
                  (mapconcat #'identity (mapcar #'cadr choices) "/")
                  ") ")
          (mapcar #'cadr choices) nil t)))
    (seq-find (lambda (elem)
                (equal (cadr elem) answer))
              choices)))