This commit is contained in:
Joel Kaasinen 2025-04-08 08:15:59 +03:00
parent e16c95c5b3
commit 75a5e816a9

View file

@ -252,9 +252,9 @@
response (fn [path] response (fn [path]
(when-let [response (or (paths (join-paths "/" path)) (when-let [response (or (paths (join-paths "/" path))
(response-fn path options))] (response-fn path options))]
(if-let [content-type (mime-type/ext-mime-type path mime-types)] (if-let [content-type (mime-type/ext-mime-type path mime-types)]
(response/content-type response content-type) (response/content-type response content-type)
response))) response)))
path-or-index-response (fn [path uri] path-or-index-response (fn [path uri]
(or (response path) (or (response path)
(when (or canonicalize-uris? (str/ends-with? uri "/")) (when (or canonicalize-uris? (str/ends-with? uri "/"))