Class: INFO-MESSAGE

Documentation

Component for showing a message to the user. If the OK-TEXT slot is non-NIL component will use that as the text for a link which, when clicked, causes the component to answer. It follows that if OK-TEXT is NIL this component will never answer.

Slots

• MESSAGE
• OK-TEXT

Hierachy

Precedence List

• STANDARD-COMPONENT

Source

(defclass info-message ()
  ((message :initarg :message :accessor message)
   (ok-text :initarg :ok-text :accessor ok-text :initform "Ok."))
  (:documentation "Component for showing a message to the user.

If the OK-TEXT slot is non-NIL component will use that as the
text for a link which, when clicked, causes the component to
answer. It follows that if OK-TEXT is NIL this component will
never answer.")
  (:metaclass standard-component-class))