 
 (defn incorrect-forms
     [w]
-    (str (reset)
+    (str reset
          (bold "class: ")           (:class w) " "
          (bold "use it: ")          (yes-no-with-caution w :use) " "
          (bold "description: ")     (:description w) " "

    [string]
    (str (char 2) string (char 15)))

(defn reset
    []
    (str (char 15)))

(defn yes-no-with-caution


(defn correct-forms
    [w]
    (str reset
         (bold "class: ")           (:class w) " "
         (bold "use it: ")          (yes-no-with-caution w :use) " "
         (bold "description: ")     (:description w) " "
