diff --git a/scheme/httpd/surflets/web-server/root/surflets/add2.scm b/scheme/httpd/surflets/web-server/root/surflets/add2.scm index f04a5c0..f732ebd 100644 --- a/scheme/httpd/surflets/web-server/root/surflets/add2.scm +++ b/scheme/httpd/surflets/web-server/root/surflets/add2.scm @@ -6,7 +6,7 @@ scheme) (begin - (define number-input-field (make-number-input-field '(maxlength 10))) + (define number-input-field (make-number-input-field '(@ (maxlength 10)))) (define (get-number input-text . maybe-title) (let* ((title (if (pair? maybe-title) (car maybe-title) #f))