Remove run body in almost every case

This commit is contained in:
David Botton 2022-03-01 00:48:04 -05:00
parent c59ae62c32
commit e5e3e07645
36 changed files with 199 additions and 121 deletions

View file

@ -33,8 +33,7 @@
(dotimes (n x)
(create-child body
(format nil "<p>Clicked ~A times.</p>" x))
(scroll-to (window body) 0 (height body))))))
(run body)))
(scroll-to (window body) 0 (height body))))))))
(defun start-tutorial ()
"Start turtorial."