refactor: use update-vals

metosin · Sep 1, 2023 · 497da67 · 497da67
1 parent df5f75e
commit 497da67
Showing 1 changed file with 2 additions and 5 deletions.
diff --git a/modules/reitit-swagger/src/reitit/swagger.cljc b/modules/reitit-swagger/src/reitit/swagger.cljc
@@ -131,11 +131,8 @@
                               (for [[_path path-data] paths
                                     [_method data] path-data]
                                 (:definitions data)))
-           paths-without-definitions (into {}
-                                           (for [[path path-data] paths]
-                                             [path (into {}
-                                                         (for [[method data] path-data]
-                                                           [method (dissoc data :definitions)]))]))]
+           paths-without-definitions (update-vals paths (fn [methods]
+                                                          (update-vals methods #(dissoc % :definitions))))]
        {:status 200
         :body (meta-merge swagger {:paths paths-without-definitions :definitions definitions})}))
     ([req res raise]