 (secretary/defroute "/" []
   (session/put! :current-page #'home-page))
 
-(secretary/defroute "/about" []
-  (session/put! :current-page #'about-page))
+(secretary/defroute "/edit" []
+  (session/put! :current-page #'edit-page))
 
 ;; -------------------------
 ;; Initialize app

      (for [[word pattern] (:hyphenations @app-state)]
        ^{:key word} [hyphenation-pattern pattern])]]]])

;; -------------------------
;; Views

(defn home-page []
  [hyphenation-list])

(defn about-page []
  [:div [:h2 "About hyphen-keeper"]
   [:div [:a {:href "/"} "go to the home page"]]])

(defn current-page []
  [:div [(session/get :current-page)]])

    [:option {:value 0} "Old Spelling"]
    [:option {:value 1} "New Spelling"]]])

(defn hyphenation-filter [search]
  [:input.form-control
   {:type "text"
    :placeholder "Search"
    :value @search
    :on-change (fn [e]
                 (reset! search (-> e .-target .-value))
                 (load-hyphenation-patterns! @spelling @search))}])

(defn suggested-hyphenation-field []
  (let [id "suggestedHyphenation"
        label "Suggested Hyphenation"]
