SPA-routing.cljc

;; In core.cljs
(ns foo.core
  (:require
    [pushy.core :as pushy]
    [re-frame.core :as rf]]))

(defn routing! []
  (pushy/start! (pushy/pushy #(rf/dispatch [:routes/set-page %]) routes/match)))

(defn ^:export init []
  (rf/dispatch-sync [:initialize-db])
  (dev-setup)
  (routing!)
  (mount-root))

;; In handler.clj

(ns foo.handler
  (:require
   [compojure.core :refer [ANY defroutes]]
   [compojure.route :refer [resources]]
   [ring.util.response :refer [resource-response]]]))

(defroutes routes
  (ANY "*" [] (resource-response "index.html" {:root "public"}))
  (resources "/"))

(def handler routes)