diff options
Diffstat (limited to 'examples/10-canvas-sneks.lisp')
-rw-r--r-- | examples/10-canvas-sneks.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/10-canvas-sneks.lisp b/examples/10-canvas-sneks.lisp index a69b429..ef5d1d5 100644 --- a/examples/10-canvas-sneks.lisp +++ b/examples/10-canvas-sneks.lisp @@ -111,7 +111,7 @@ sneks. Adds the canvas to the app, and sets up the perframe handler." (loop repeat (population app) collect (random-snek 100 100))) (setf (ww:width (snek-pit app)) (ww::application-width app) (ww:height (snek-pit app)) (ww::application-width app)) - (ww::add-unit app (snek-pit app)) + (ww::add-unit (snek-pit app)) (ww:add-handler app #'sneks-a-go-go)) (defun start (&key (side 800) (population 50)) |