aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/wheelwork.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/wheelwork.lisp')
-rw-r--r--src/wheelwork.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/wheelwork.lisp b/src/wheelwork.lisp
index 885ae1e..849e2c7 100644
--- a/src/wheelwork.lisp
+++ b/src/wheelwork.lisp
@@ -66,7 +66,7 @@ TARGET is FOCUSABLEP"
(defun get-rect (unit)
"Returns a list of vectors representing the path of the smallest
rectangle that encloses the unit. The rectangle is scaled and rotated."
- (with-accessors ((x x) (y y) (w unit-width) (h unit-height) (r rotation)) unit
+ (with-accessors ((x x) (y y) (w width) (h height) (r rotation)) unit
(let ((m
(mat:meye 4))
(tr