From 7055289412394f0ebe1e98ba7ff8eabc7d855e0b Mon Sep 17 00:00:00 2001 From: interp Date: Fri, 24 Jan 2003 15:34:37 +0000 Subject: [PATCH] Add comment to MAKE-REDIRECT-RESPONSE. --- scheme/httpd/response.scm | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/scheme/httpd/response.scm b/scheme/httpd/response.scm index 79cd524..a06e192 100644 --- a/scheme/httpd/response.scm +++ b/scheme/httpd/response.scm @@ -244,8 +244,13 @@ response of a gateway.~%") (format out "~%~%~A~%~%~%~%" message) (format out "~%

~A

~%" message)) -;; Creates a redirect response. The server will serve the new file indicated by -;; NEW-LOCATION. NEW-LOCATION must be uri-encoded and begin with a slash. +;; Creates a redirect response. The server will serve the new file +;; indicated by NEW-LOCATION. NEW-LOCATION must be uri-encoded and +;; begin with a slash. This is intended for CGI scripts. Note that +;; the browser won't notice the redirect. Thus, it will keep the +;; original URL. For "real" redirections, use +;; (make-error-response (status-code moved-perm) req +;; "new-location" "new-location"). (define (make-redirect-response new-location) (make-response (status-code redirect)