Some notes

This commit is contained in:
David Botton 2021-01-06 22:06:31 -05:00
parent 5c498e16cf
commit c39213d5f2

View file

@ -11,7 +11,7 @@
)
(defun on-new-window (body)
(handler-case
(handler-case ; Disconnects from the browser can be handled gracefully using the condition system.
(progn
(setf (title (html-document body)) "Tutorial 7")
@ -58,7 +58,7 @@
(setf mover-y bounds-y))
(sleep .02)))
) (error (c)
) (error ()
(format t "Lost connection.~&"))))
(defun start-tutorial ()