From 7bf212df6c3cf0d16b7145ddb18b97f504717230 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Fri, 8 Jul 2022 10:13:16 -0500 Subject: [add] exports to pacage; [rename] frameset-key/sprite-frameset-key --- src/interactive/sprite.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/interactive/sprite.lisp') diff --git a/src/interactive/sprite.lisp b/src/interactive/sprite.lisp index 03bba8d..e478d37 100644 --- a/src/interactive/sprite.lisp +++ b/src/interactive/sprite.lisp @@ -4,11 +4,11 @@ (defclass/std sprite (unit interactive) ((framesets :with :doc "A PLIST whose values are framesets.") - (frameset-key))) + (frameset-key :with))) (defun current-frameset (sprite) (getf (sprite-framesets sprite) - (frameset-key sprite))) + (sprite-frameset-key sprite))) (defmethod initialize-instance :after ((sprite sprite) &key) (with-slots (framesets frameset-key) sprite -- cgit v1.2.3