     :spelling 1
     :word ""
     :hyphenation ""
-    :suggested-hyphenation ""}))
+    :suggested-hyphenation ""
+    :feedback {:message "" :kind :none}}))
 
 (def spelling (reagent/cursor app-state [:spelling]))
 (def word (reagent/cursor app-state [:word]))
 (def hyphenation (reagent/cursor app-state [:hyphenation]))
 (def suggested-hyphenation (reagent/cursor app-state [:suggested-hyphenation]))
+(def feedback (reagent/cursor app-state [:feedback]))
 
 (defn update-hyphenations! [f & args]
   (apply swap! app-state update-in [:hyphenations] f args))

       :disabled "disabled"
       :value @suggested-hyphenation}]]))

(defn new-hyphenation []
  [:div.form
   [spelling-filter]
   [word-field]
   [suggested-hyphenation-field]
   [hyphenation-field]
   [hyphenation-add-button]])

(defn hyphenation-list []
  [:div.container

            :response-format :json
            :keywords? true))

(defn set-feedback! [message kind]
  (reset! feedback {:message message :kind kind})
  (.setTimeout js/window #(reset! feedback {:message "" :kind :none}) 2000)
  )

(defn reset-all! []
  (set-feedback! "Word successfully added" :success)
  (reset! word "")
  (reset! hyphenation "")
  (reset! suggested-hyphenation "")
