From 3782dddb07974f1b1b79478d2f96384498e81bf4 Mon Sep 17 00:00:00 2001
From: Colin Okay <colin@cicadas.surf>
Date: Thu, 21 Jul 2022 08:15:57 -0500
Subject: [refactor] make-frameset to use clearler naming

---
 src/interactive/frameset.lisp | 5 ++---
 1 file 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))))
-- 
cgit v1.2.3