     (get-rand-defn)
     [:div {:class "container home"}
      [:header [:h2 {:class "title"} "What is History?"]]
-     [definition defn-atom]
+     [definition app-atom]
      [:a {:href "/defineit"} "Contribute Your Own Definition"]
      [footer]]))
 
 (defn defineit-page []
+  (parse-init)
+  (def usr-promise (save-anonymous-user))
+  (.then usr-promise (fn [usr]
+                       (.set usr "ip" (js/getIP))
+                       (.save usr)))
   (fn []
     [:div {:class "container defineit"}
      [:header [:h2 {:class "title"} "What is History?"]]

;; -------------------------
;; Components

(defn defn-form-content []
  [:form {:class "defnForm"}
   [:div {:class "fieldsWrap"}
    [:input {:type "text"
             :class "authorInput"
             :placeholder "Your Name (Optional)"}]
    [:a {:class "button formToggle"} "Add Another Author's Definition"]
    [:br]
    [:input {:type "email"
             :class "emailInput"
             :placeholder "Enter Your Email"}]
    [:input {:type "email"
             :class "emailConfirm"
             :placeholder "Enter Your Email"}]
    [:span {:class "emailIsConfirmed no"}]
    [:textarea {:class "defnInput twelve columns"
                :placeholder "Please compose your definition here..."}]
    [:div {:class "btnWrap"}
     [:button {:class "button-primary defnSubmit"} "Submit"]]]])

(defn defn-form []
  [defn-form-content])

(defn definition [defn-atom]
  (fn [defn-atom]
    (if-not (= (get @defn-atom :text) "")
      [:section {:class "row"}
       [:p {:class "ten columns"} (get @defn-atom :text)
        [:span {:class "author"}" -- " (get @defn-atom :author)]]])))

(defn footer []
  [:footer

          much time. Ten minutes should be sufficient. It is also
          okay to cite another author who you feel expresses things
          clearly."]
     [defn-form app-atom]]))

; (defn about-page []
;   [:div [:h2 "About whatishistory"]
