      ;[xtra-info-form app-atom]
      (if (nil? (get @app-atom :defn-obj))
        [defn-form app-atom]
-       [xtra-info-form app-atom])
-     ]))
+       (condp = (get @app-atom :defn-form-mode)
+         "default" [xtra-info-form-content app-atom]
+         "anothers" [anothers-xtra-info-form-content]))]))
 
 ; (defn about-page []
 ;   [:div [:h2 "About whatishistory"]

                             (.preventDefault evt)
                             (save-xtra-info app-atom))} "Submit"]]]])

(defn defn-form [app-atom]
  (if (nil? (get @app-atom :defn-form-mode))
    (swap! app-atom assoc :defn-form-mode "default"))

    (if (= mode "default")
      [defn-form-content app-atom]
      [anothers-defn-form-content app-atom])))

(defn definition [app-atom]
  (fn [app-atom]
