diff options
| author | Colin Okay <colin@cicadas.surf> | 2022-07-27 12:07:10 -0500 |
|---|---|---|
| committer | Colin Okay <colin@cicadas.surf> | 2022-07-27 12:07:10 -0500 |
| commit | 11f8d6dad0078464ccbc29cab57908a0923ca447 (patch) | |
| tree | ff56d4daf1c2d7cb657587a9fcacdeedfef36307 /examples/01-click-and-drag-image.lisp | |
| parent | 0b743b90752bacf31923171af9af0e5ff1f08095 (diff) | |
[refactor] represent scene as a vector; [refactor] shared text shader
Diffstat (limited to 'examples/01-click-and-drag-image.lisp')
| -rw-r--r-- | examples/01-click-and-drag-image.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/01-click-and-drag-image.lisp b/examples/01-click-and-drag-image.lisp index e895d24..da6a12f 100644 --- a/examples/01-click-and-drag-image.lisp +++ b/examples/01-click-and-drag-image.lisp @@ -11,7 +11,7 @@ (ww::defhandler dragging-unit (ww::on-mousemotion (app x y) (let ((unit - (first (ww::application-scene app)))) + (elt (ww::application-scene app) 0))) (setf (ww:x unit) x (ww:y unit) y)))) |