From 7bf212df6c3cf0d16b7145ddb18b97f504717230 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Fri, 8 Jul 2022 10:13:16 -0500 Subject: [add] exports to pacage; [rename] frameset-key/sprite-frameset-key --- examples/08-pong.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'examples/08-pong.lisp') diff --git a/examples/08-pong.lisp b/examples/08-pong.lisp index eae6843..51de28d 100644 --- a/examples/08-pong.lisp +++ b/examples/08-pong.lisp @@ -121,7 +121,7 @@ on which boundary VAL is outside of." (ww::defhandler pong-mousemove (ww::on-mousemotion (app) "Just sets the position of the paddle, and updates the paddles dx" - (setf (ww::x (paddle app)) + (setf (ww::x (paddle app)) (- x (* 0.5 (ww::width (paddle app)))) ;; using dx to store some motion informaton ;; used to chagne dx and dr in the ball -- cgit v1.2.3