diff --git a/web-world/main.rkt b/web-world/main.rkt
index abddd38..4f82532 100644
--- a/web-world/main.rkt
+++ b/web-world/main.rkt
@@ -92,7 +92,7 @@
   (syntax-case stx ()
     [(_ a-view [a-selector a-type a-function] ...)
      (foldl (lambda (a-selector a-type a-function a-view-stx)
-              #'(view-bind (view-focus #,a-view-stx #,a-selector)
+              #`(view-bind (view-focus #,a-view-stx #,a-selector)
                            #,a-type
                            #,a-function))
             #'a-view