diff --git a/web-world/examples/todo/todo.rkt b/web-world/examples/todo/todo.rkt
index 8caaab6..f9752ba 100644
--- a/web-world/examples/todo/todo.rkt
+++ b/web-world/examples/todo/todo.rkt
@@ -33,12 +33,11 @@
    [else
     (view-append-child (view-focus view "#items")
                        ;; FIXME: I want this to add a DOM to this.
-                       `(li (@ (id ,(item-id item)))
-                            (item-content item)))]))
+                       (xexp->dom `(li (@ (id ,(item-id item)))
+                                       ,(item-content item))))]))
 
   
 
-
 (define the-view
   (view-bind (view-focus (->view index.html) "#add-button")
              "click"