1 files 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.