diff options
| -rw-r--r-- | examples/14-canvas-paint.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/examples/14-canvas-paint.lisp b/examples/14-canvas-paint.lisp index 737c12d..30db422 100644 --- a/examples/14-canvas-paint.lisp +++ b/examples/14-canvas-paint.lisp @@ -142,7 +142,8 @@ :pixel-width (canvas-size app) :pixel-height (canvas-size app)))) (setf *last-draw-time* 0) - (ww:add-unit canvas))) + (ww:add-unit canvas) + (ww:refocus-on canvas))) |