From 6897f90e0f3df933b271eadd6a41513c8173c080 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Sat, 9 Jul 2022 09:18:46 -0500 Subject: [formatting] --- README.org | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/README.org b/README.org index a97d2ba..a8f9844 100644 --- a/README.org +++ b/README.org @@ -160,8 +160,9 @@ Here is a simple example where a handler is defined, from the pong game: #+begin_src lisp (ww:defhandler pong-mousemove (ww:on-mousemotion (app) - (setf (ww:x (paddle app)) (- x (* 0.5 (ww:width (paddle app)))) - (dx (paddle app)) xrel))) + (with-slots (paddle) app + (setf (ww:x paddle) (- x (* 0.5 (ww:width paddle))) + (dx paddle) xrel)))) #+end_src See the example for details. -- cgit v1.2.3