diff --git a/scene.scm b/scene.scm
index f6b3a81..4b64738 100644
--- a/scene.scm
+++ b/scene.scm
@@ -112,16 +112,17 @@
 (define square (~ (* (! counter) (! counter))))
 
 (define root-ref
-  (sxml->dom-ref `(div (@ (class "foo"))
-                   (p "this is a test")
-                   (button (@ (id "button")
-                              (type "button")
-                              (click ,(lambda (e)
-                                       (! counter (1+ (! counter)))
-                                       ;; Hacky hack to ensure root-ref isn't GC'd too early...
-                                       (display root-ref))))
-                           "Counter: "
-                           ,counter)
-                   (p "The square is: " ,square))))
+  (sxml->dom-ref
+   `(div (@ (class "foo"))
+         (p "this is a test")
+         (button (@ (id "button")
+                    (type "button")
+                    (click ,(lambda (e)
+                              (! counter (1+ (! counter)))
+                              ;; Hacky hack to ensure root-ref isn't GC'd too early...
+                              (display root-ref))))
+                 "Counter: "
+                 ,counter)
+         (p "The square is: " ,square))))
 
 (append-child! (document-body) (element-ref-element root-ref))