eliminating the change event handler.

2011-09-05 16:02:14 -04:00 · 2011-09-05 16:02:14 -04:00 · d3a252e547
commit d3a252e547
parent a377ccb67b
1 changed files with 2 additions and 6 deletions
--- a/web-world/examples/todo/todo.rkt
+++ b/web-world/examples/todo/todo.rkt
@ -75,13 +75,9 @@
  

 (define the-view
-  (let* ([v1 (view-bind (view-focus (->view index.html) "add-button")
+  (view-bind (view-focus (->view index.html) "add-button")
                        "click"
-                        on-add)]
-         [v2 (view-bind (view-focus v1 "next-item")
-                        "change"
-                        on-add)])
-    v2))
+                        on-add))


 (big-bang (list (new-item "milk")