aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/guile/cantius.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/guile/cantius.scm b/src/guile/cantius.scm
index 247807b..247d593 100644
--- a/src/guile/cantius.scm
+++ b/src/guile/cantius.scm
@@ -389,12 +389,12 @@
(path (uri:split-and-decode-uri-path path-string))
(($* endpoint-ref-result path-tail endpoint parameters)
(query-endset root-endset path (%catchall-ref-result))))
- (define (normalized-path-string)
+ (define (normalized-uri-path-string)
(format #f "/~a" (uri:encode-and-join-uri-path path)))
(define (redirect-path)
(if (%redirect/normalize-path?)
- (normalized-path-string)
+ (normalized-uri-path-string)
(uri:uri-path (request-uri request))))
(define (redirect-query)