aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--src/interactive/frameset.lisp5
1 files changed, 2 insertions, 3 deletions
diff --git a/src/interactive/frameset.lisp b/src/interactive/frameset.lisp
index 86f445d..3ffbc18 100644
--- a/src/interactive/frameset.lisp
+++ b/src/interactive/frameset.lisp
@@ -47,7 +47,6 @@
(defmethod render ((fs frameset))
(render (current-frame-unit fs)))
-
(macrolet
((def-frameset-accessors (&rest accessor-names)
(let ((defs
@@ -73,7 +72,7 @@
(defun make-frameset (sequenced-assets &key (fps 2) asset-args)
(let* ((asset-names
(remove-duplicates sequenced-assets :test #'equal))
- (assets
+ (images
(loop for name in asset-names
collect
(make-instance
@@ -84,6 +83,6 @@
collect (position name asset-names :test #'equal))))
(make-instance
'frameset
- :frames (make-array (length assets) :initial-contents assets)
+ :frames (make-array (length images) :initial-contents images)
:sequence (make-array (length sequence) :initial-contents sequence)
:wait-time (/ 1000.0 fps))))