Function: message-talkative-question

message-talkative-question is a byte-compiled function defined in message.el.gz.

Signature

(message-talkative-question ASK QUESTION SHOW &rest TEXT)

Documentation

Call FUNCTION with argument QUESTION; optionally display TEXT... args.

If SHOW is non-nil, the arguments TEXT... are displayed in a temp buffer. The following arguments may contain lists of values.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/message.el.gz
;;; Help stuff.

(defun message-talkative-question (ask question show &rest text)
  "Call FUNCTION with argument QUESTION; optionally display TEXT... args.
If SHOW is non-nil, the arguments TEXT... are displayed in a temp buffer.
The following arguments may contain lists of values."
  (if (and show
	   (setq text (flatten-tree text)))
      (save-window-excursion
        (with-output-to-temp-buffer " *MESSAGE information message*"
          (with-current-buffer " *MESSAGE information message*"
	    (fundamental-mode)
	    (mapc #'princ text)
	    (goto-char (point-min))))
	(funcall ask question))
    (funcall ask question)))