diff options
| author | Colin Okay <colin@cicadas.surf> | 2022-07-28 12:50:14 -0500 |
|---|---|---|
| committer | Colin Okay <colin@cicadas.surf> | 2022-07-28 12:50:14 -0500 |
| commit | 1f4a2cd3cd588be88310ddf15186e967f0db2781 (patch) | |
| tree | e0211c6b1f48a99eca7dffd400832b5f95baee20 | |
| parent | 3a44249f757e40c456426244cbf6475ddbdfc776 (diff) | |
[examples] canvas has focus on start
| -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))) |