diff options
Diffstat (limited to 'examples/08-pong.lisp')
| -rw-r--r-- | examples/08-pong.lisp | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/examples/08-pong.lisp b/examples/08-pong.lisp index f40e66d..574eacd 100644 --- a/examples/08-pong.lisp +++ b/examples/08-pong.lisp @@ -163,9 +163,9 @@ on which boundary VAL is outside of." (ball app) ball (game-over app) game-over) - (ww::add-unit app ball) - (ww::add-unit app paddle) - (ww::add-unit app game-over) + (ww::add-unit ball) + (ww::add-unit paddle) + (ww::add-unit game-over) (ww::add-handler app #'pong-mousemove) (ww::add-handler app #'pong-perframe)))) @@ -183,7 +183,7 @@ on which boundary VAL is outside of." :scale-x 3.0 :scale-y 3.0))) (setf (intro-text app) intro-text) - (ww:add-unit app intro-text)) + (ww:add-unit intro-text)) (ww:add-handler app #'press-to-start)) (defun start () |