mirror of
https://github.com/metosin/reitit.git
synced 2026-01-28 17:00:34 +00:00
Use ensure-slash at compilation
This commit is contained in:
parent
e2e96e8f1e
commit
8d4c591f96
1 changed files with 3 additions and 1 deletions
|
|
@ -55,7 +55,9 @@
|
||||||
[maybe-arg (rest args)])
|
[maybe-arg (rest args)])
|
||||||
macc (into macc (expand data opts))
|
macc (into macc (expand data opts))
|
||||||
child-routes (walk-many (str pacc path) macc (keep identity childs))]
|
child-routes (walk-many (str pacc path) macc (keep identity childs))]
|
||||||
(if (seq childs) (seq child-routes) [[(str pacc path) macc]])))))]
|
(if (seq childs)
|
||||||
|
(seq child-routes)
|
||||||
|
[[(str pacc (ensure-slash path)) macc]])))))]
|
||||||
(walk-one path (mapv identity data) raw-routes)))
|
(walk-one path (mapv identity data) raw-routes)))
|
||||||
|
|
||||||
(defn map-data [f routes]
|
(defn map-data [f routes]
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue