diff options
| author | Colin Okay <colin@cicadas.surf> | 2022-07-20 10:04:59 -0500 |
|---|---|---|
| committer | Colin Okay <colin@cicadas.surf> | 2022-07-20 10:04:59 -0500 |
| commit | 613f3381583537033e03285ab3f9242bbfbeba65 (patch) | |
| tree | edea9934e89bd5288d6de5d899b2514f52394e8a /examples/12-canvas-drawing-language.lisp | |
| parent | fdd4275c181fbf86c9cac01eb651fb6885cdf371 (diff) | |
[modify] how apply-pen-at handles pen width
Diffstat (limited to 'examples/12-canvas-drawing-language.lisp')
| -rw-r--r-- | examples/12-canvas-drawing-language.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/examples/12-canvas-drawing-language.lisp b/examples/12-canvas-drawing-language.lisp index b4a621b..43d2dea 100644 --- a/examples/12-canvas-drawing-language.lisp +++ b/examples/12-canvas-drawing-language.lisp @@ -70,7 +70,7 @@ (list 0 0)) do (ww::fill-rel-bezier ls 12) - (ww::with-pen (:color (list 0 0 0 255)) + (ww::with-pen (:color (list 0 0 0 255) :width 1) (ww::stroke-rel-bezier ls 12))))) (defun draw-stuff (canvas) |