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

@ -28,8 +28,7 @@
"On-new-window handler."
(setf (title (html-document body)) "Tutorial 6")
(set-on-click (create-section body :h1 :content "(click me to start!)")
'my-on-click)
(run body))
'my-on-click))
(defun start-tutorial ()
"Start turtorial."