diff options
author | Colin Okay <colin@cicadas.surf> | 2022-07-09 09:18:46 -0500 |
---|---|---|
committer | Colin Okay <colin@cicadas.surf> | 2022-07-09 09:18:46 -0500 |
commit | 6897f90e0f3df933b271eadd6a41513c8173c080 (patch) | |
tree | 04504c7a5249795ad240f73ad2b9bfcda3c40513 | |
parent | 74c85df8a56eb18634c5d68953e078ab99585ade (diff) |
[formatting]
-rw-r--r-- | README.org | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -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. |