From d36409fddc8c021ff309a29290db6dd57a868f18 Mon Sep 17 00:00:00 2001 From: interp Date: Fri, 23 May 2003 09:14:58 +0000 Subject: [PATCH] remove debug output --- scheme/httpd/surflets/web-server/root/surflets/test.scm | 2 -- 1 file changed, 2 deletions(-) diff --git a/scheme/httpd/surflets/web-server/root/surflets/test.scm b/scheme/httpd/surflets/web-server/root/surflets/test.scm index ad1122e..59039ca 100644 --- a/scheme/httpd/surflets/web-server/root/surflets/test.scm +++ b/scheme/httpd/surflets/web-server/root/surflets/test.scm @@ -120,9 +120,7 @@ test")) (format #f "returned via annotated string ~s" string))) (else (set-text-input-field-value! text text-entered) - (format #t "passed1 ") (only-select-selected! select selected (cdr selections)) - (format #t "passed2 ") (only-select-selected! select2 (list selected2) (car selections)) (if number-entered (set-number-input-field-value! number number-entered))