luciano/reitit
1
0
Fork 0
mirror of https://github.com/metosin/reitit.git synced 2025-12-20 09:31:11 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

best-effort to retain route order with swagger

Browse source
This commit is contained in:
Tommi Reiman 2019-02-28 14:59:48 +02:00
parent 684f5bbb29
commit 5713afac34
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
modules/reitit-swagger/src/reitit/swagger.cljc
View file

@ -98,7 +98,8 @@
transform-path (fn [[p _ c]] transform-path (fn [[p _ c]]
(if-let [endpoint (some->> c (keep transform-endpoint) (seq) (into {}))] (if-let [endpoint (some->> c (keep transform-endpoint) (seq) (into {}))]
[(swagger-path p) endpoint]))] [(swagger-path p) endpoint]))]
(let [paths (->> router (r/compiled-routes) (filter accept-route) (map transform-path) (into {}))] (let [map-in-order #(->> % (apply concat) (apply array-map))
paths (->> router (r/compiled-routes) (filter accept-route) (map transform-path) map-in-order)]
{:status 200 {:status 200
:body (meta-merge swagger {:paths paths})}))) :body (meta-merge swagger {:paths paths})})))
([req res raise] ([req res raise]