diff options
author | Colin Okay <colin@cicadas.surf> | 2022-06-29 07:01:34 -0500 |
---|---|---|
committer | Colin Okay <colin@cicadas.surf> | 2022-06-29 07:01:34 -0500 |
commit | 76ff8ae407409d9b521dee42552867be6af0264c (patch) | |
tree | 7df97e621e3faa8bb18a5c8cf4895a658d8bc1e1 /wheelwork.lisp | |
parent | ff0d86e99de2ce0fb61efd82070b758de0bb107f (diff) |
[bugfix] in contains-point-p
Diffstat (limited to 'wheelwork.lisp')
-rw-r--r-- | wheelwork.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/wheelwork.lisp b/wheelwork.lisp index a1208a6..7fadb57 100644 --- a/wheelwork.lisp +++ b/wheelwork.lisp @@ -494,7 +494,7 @@ TARGET is FOCUSABLEP" (let ((pt (vec:vec px py 0.0 1.0)) (corner - (vec:vec 0.0 0.0 0.0 1.0)) + (vec:vec -1.0 -1.0 0.0 1.0)) (poly (get-rect unit))) (loop for (p1 p2 . more) on poly |