diff --git a/scheme/httpd/surflets/web-server/root/surflets/calculate.scm b/scheme/httpd/surflets/web-server/root/surflets/calculate.scm index e28c864..fd1dfe7 100644 --- a/scheme/httpd/surflets/web-server/root/surflets/calculate.scm +++ b/scheme/httpd/surflets/web-server/root/surflets/calculate.scm @@ -55,14 +55,14 @@ (td ,(operator-symbol operator-pair)) (td ,number-field2) (td " = ") - (td ,(make-submit-button '(value "calculate")))))) + (td ,(make-submit-button '(@ (value "calculate"))))))) (hr) (p "You may choose another operator:") (servlet-form ,change-operator-callback (table (tr (td ,operator-input-field) - (td ,(make-submit-button '(value "change operator")))))))))) + (td ,(make-submit-button '(@ (value "change operator"))))))))))) (define (change-operator to-operation) (show-page to-operation))