diff options
| author | Colin Okay <colin@cicadas.surf> | 2022-07-17 07:46:21 -0500 |
|---|---|---|
| committer | Colin Okay <colin@cicadas.surf> | 2022-07-17 07:46:21 -0500 |
| commit | b72153a73875fc0081d072b90ac411c0eaef08a8 (patch) | |
| tree | 11feee3e28e665b7661151d191c2126428157429 /src/interactive | |
| parent | 35fad29cec4ccaa338e03f9b0879757a9c4c860e (diff) | |
[refactor] [rename] with-line/with-grid-line; all vars now in loop
Diffstat (limited to 'src/interactive')
| -rw-r--r-- | src/interactive/canvas.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interactive/canvas.lisp b/src/interactive/canvas.lisp index 256348e..e8bdc39 100644 --- a/src/interactive/canvas.lisp +++ b/src/interactive/canvas.lisp @@ -89,7 +89,7 @@ e.g., drawing a line in a particular color." (let ((pxs (gensym))) `(let ((,pxs ,pixels)) - (with-line (,x ,y) (,start-x ,start-y) (,end-x ,end-y) + (with-grid-line (,x ,y) (,start-x ,start-y) (,end-x ,end-y) (with-pixel (,r ,g ,b ,a) (pixel ,pxs ,x ,y) ,@body))))) |