From 5770918384d0d535d064a6eaeb81758b94312b7f Mon Sep 17 00:00:00 2001 From: interp Date: Thu, 7 Nov 2002 20:42:06 +0000 Subject: [PATCH] Remove debug output --- scheme/httpd/surflets/web-server/root/surflets/calculate-cb.scm | 1 - 1 file changed, 1 deletion(-) diff --git a/scheme/httpd/surflets/web-server/root/surflets/calculate-cb.scm b/scheme/httpd/surflets/web-server/root/surflets/calculate-cb.scm index be992f2..e83674b 100644 --- a/scheme/httpd/surflets/web-server/root/surflets/calculate-cb.scm +++ b/scheme/httpd/surflets/web-server/root/surflets/calculate-cb.scm @@ -49,7 +49,6 @@ (make-number-input-field))) (define (show-page operator-pair number1 number2 . maybe-update-text) - (format #t "number1 ~s number2 ~s~%" number1 number2) (let* ((update-text (:optional maybe-update-text "")) (number-field1 (make-number-input-field/default number1)) (number-field2 (make-number-input-field/default number2))