Read query string in HTML5 router

This commit is contained in:
Juho Teperi 2018-08-23 09:54:36 +03:00
parent 0bd1b94274
commit e42c309144
4 changed files with 16 additions and 3 deletions

View file

@ -51,4 +51,5 @@
:figwheel {:http-server-root "public"
:server-port 3449
:nrepl-port 7002})
:nrepl-port 7002
:ring-handler backend.server/handler})

View file

@ -5,6 +5,6 @@
</head>
<body>
<div id="app"></div>
<script src="js/app.js"></script>
<script src="/js/app.js"></script>
</body>
</html>

View file

@ -0,0 +1,11 @@
(ns backend.server
(:require [clojure.java.io :as io]
[ring.util.response :as resp]
[ring.middleware.content-type :as content-type]))
(def handler
(-> (fn [request]
(or (resp/resource-response (:uri request) {:root "public"})
(-> (resp/resource-response "index.html" {:root "public"})
(resp/content-type "text/html"))))
content-type/wrap-content-type))

View file

@ -96,7 +96,8 @@
(gevents/unlistenByKey listen-key)
(gevents/unlistenByKey click-listen-key))
(-get-path [this]
(.. js/window -location -pathname))
(str (.. js/window -location -pathname)
(.. js/window -location -search)))
(-href [this path]
path))