aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorW. Kosior <koszko@koszko.org>2025-03-26 16:34:16 +0100
committerW. Kosior <koszko@koszko.org>2025-03-26 16:34:16 +0100
commit00b299e7b17e9c05596e7ed77778bf54d55c8dec (patch)
treeea772ccbb9bbeb833b045c89788237445e5c5509
parent291ef57ad93dfd76d6c13728b825ae7b2096921e (diff)
downloadcantius-00b299e7b17e9c05596e7ed77778bf54d55c8dec.tar.gz
cantius-00b299e7b17e9c05596e7ed77778bf54d55c8dec.zip
Do not use programmer-supplied HTTP headers on automatic redirect.
-rw-r--r--src/guile/cantius.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/guile/cantius.scm b/src/guile/cantius.scm
index e0db981..5e48612 100644
--- a/src/guile/cantius.scm
+++ b/src/guile/cantius.scm
@@ -698,7 +698,7 @@
(and cant$redirect/remove-query?
(uri:uri-query uri)))
- (values (build-response* cant$default-headers
+ (values (build-response* %default-headers
#:code 307
#:redirect-to (uri:build-relative-ref
#:path (redirect-path)