diff --git a/examples/select.rkt b/examples/select.rkt index a0d5b9c..9e531ae 100644 --- a/examples/select.rkt +++ b/examples/select.rkt @@ -17,11 +17,10 @@ (span (@ (id "fill-me-in"))))))) (define (when-select-changed w v) - (printf "I see: ~s\n" (view-form-value (view-focus v "my-select"))) (view-form-value (view-focus v "my-select"))) (define bound-view (view-bind-many view ["my-select" "change" when-select-changed])) (big-bang "nothing yet" (initial-view bound-view) - (to-draw draw)) \ No newline at end of file + (to-draw draw))