remobe ROFL and add validation

[clinton/lisp-on-lines.git] / src / standard-descriptions / edit.lisp

diff --git a/src/standard-descriptions/edit.lisp b/src/standard-descriptions/edit.lisp
index 3c04a92..f7e0411 100644 (file)
--- a/src/standard-descriptions/edit.lisp
+++ b/src/standard-descriptions/edit.lisp
@@ -51,6 +51,9 @@
      (parser :initarg :parse-using
             :initform 'identity
             :accessor attribute-editor-parsing-function)
      (parser :initarg :parse-using
             :initform 'identity
             :accessor attribute-editor-parsing-function)

+     (attributes :initarg :attributes
+                :initform nil
+                :accessor attribute-editor-attributes)

      (prompt :initarg :prompt 
             :initform nil)
      (unbound-value
      (prompt :initarg :prompt 
             :initform nil)
      (unbound-value