From 77cd3e0d28cb747d15f326a8b70293cc1c1738a2 Mon Sep 17 00:00:00 2001 From: interp Date: Mon, 2 Dec 2002 08:44:02 +0000 Subject: [PATCH] REQUEST:URL --> REQUEST-URL --- scheme/httpd/surflets/web-server/root/surflets/add2.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scheme/httpd/surflets/web-server/root/surflets/add2.scm b/scheme/httpd/surflets/web-server/root/surflets/add2.scm index c19da03..6b2e295 100644 --- a/scheme/httpd/surflets/web-server/root/surflets/add2.scm +++ b/scheme/httpd/surflets/web-server/root/surflets/add2.scm @@ -28,7 +28,7 @@ (URL "add2.scm" "Start new calculation.")))))))) (if result (or (input-field-value number-input-field - (form-query (http-url-search (request:url result)))) + (form-query (http-url-search (request-url result)))) (get-number input-text "Please enter a valid number.")) (get-number input-text "Please enter a number."))))