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

response/redirect

Browse source
This commit is contained in:
Tommi Reiman 2018-06-05 00:03:00 +03:00
parent 21de7a038a
commit 4a4cd5ae9e
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
modules/reitit-ring/src/reitit/ring.cljc
View file

@ -107,7 +107,7 @@
(loop [[file & files] index-files] (loop [[file & files] index-files]
(if file (if file
(if (resource-response (join-paths path file)) (if (resource-response (join-paths path file))
{:status 302 :headers {"Location" (join-paths uri file)}} (response/redirect (join-paths uri file))
(recur files)))))) (recur files))))))
handler (if path handler (if path
(fn [request] (fn [request]

2
test/cljc/reitit/ring_test.cljc
View file

@ -268,7 +268,7 @@
#?(:clj #?(:clj
(deftest resource-handler-test (deftest resource-handler-test
(let [redirect (fn [uri] {:status 302 :headers {"Location" uri}}) (let [redirect (fn [uri] {:status 302, :body "", :headers {"Location" uri}})
request (fn [uri] {:uri uri, :request-method :get})] request (fn [uri] {:uri uri, :request-method :get})]
(testing "inside a router" (testing "inside a router"