luciano/reitit
1
0
Fork 0
mirror of https://github.com/metosin/reitit.git synced 2026-02-08 21:03:11 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Format code

Browse source
This commit is contained in:
Juho Teperi 2018-07-11 09:39:10 +03:00
parent 7f1b2ce417
commit 434bc25cd6
1 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
modules/reitit-core/src/reitit/impl.cljc
View file

@ -131,7 +131,10 @@
(defn path-for [^Route route path-params] (defn path-for [^Route route path-params]
(if-let [required (:path-params route)] (if-let [required (:path-params route)]
(if (every? #(contains? path-params %) required) (if (every? #(contains? path-params %) required)
(str "/" (str/join \/ (map #(get (or path-params {}) % %) (:path-parts route))))) (->> (:path-parts route)
(map #(get (or path-params {}) % %))
(str/join \/)
(str "/")))
(:path route))) (:path route)))
(defn throw-on-missing-path-params [template required path-params] (defn throw-on-missing-path-params [template required path-params]
@ -214,5 +217,8 @@
"shallow transform of query parameters into query string" "shallow transform of query parameters into query string"
[params] [params]
(->> params (->> params
(map (fn [[k v]] (str (url-encode (into-string k)) "=" (url-encode (into-string v))))) (map (fn [[k v]]
(str (url-encode (into-string k))
"="
(url-encode (into-string v)))))
(str/join "&"))) (str/join "&")))