Archive.filePath

2022-09-18 22:42:18 +00:00
parent ff512c6f9e
commit 0d295198df
2 changed files with 4 additions and 1 deletions
--- a/projects/nat-archive-tool/src/nat/Archive.kiss
+++ b/projects/nat-archive-tool/src/nat/Archive.kiss
@@ -74,3 +74,6 @@
        id (Uuid.v4)
        components (new Map)
        files []))
+
+(method filePath [file]
+    (joinPath archiveDir "files" file))
--- a/projects/nat-flixel-desktop-playground/source/EntrySprite.kiss
+++ b/projects/nat-flixel-desktop-playground/source/EntrySprite.kiss
@@ -17,7 +17,7 @@
    (cond
        ((hasComponent e Images2)
            (let [images (readComponent e Images2)]
-                (.onComplete (BitmapData.loadFromFile (joinPath archive.archiveDir "files" (nth images.imageFiles images.pinnedImageIndex)))
+                (.onComplete (BitmapData.loadFromFile (archive.filePath  (nth images.imageFiles images.pinnedImageIndex)))
                    ->bitmapData {
                        (loadGraphic bitmapData)
                    })))