From 192d33e5fdd33c38d02d5e3d4b1c5177d10108ae Mon Sep 17 00:00:00 2001
From: Nat Quayle Nelson <natquaylenelson@gmail.com>
Date: Fri, 11 Oct 2024 10:51:54 -0500
Subject: [PATCH] allow ignoring cameras in sprite log

---
 src/kiss_flixel/SpriteTools.kiss | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/src/kiss_flixel/SpriteTools.kiss b/src/kiss_flixel/SpriteTools.kiss
index be030e6..b3bb911 100644
--- a/src/kiss_flixel/SpriteTools.kiss
+++ b/src/kiss_flixel/SpriteTools.kiss
@@ -86,6 +86,7 @@
 (var &mut _idx 0)
 (var &mut doPrint true)
 (var :Map<flixel.FlxBasic,Bool> ignoreObjects (new Map))
+(var :Map<flixel.FlxCamera,Bool> ignoreCameras (new Map))
 (function :String logSprites [&opt :flixel.FlxCamera _camera :FlxGroup group :String tab :StringBuf buf]
     (unless buf
         (set buf (new StringBuf)))
@@ -98,10 +99,11 @@
         (_print "###############")
         (let [cameras (enumerate (filter FlxG.cameras.list))]
             (doFor [idx camera] cameras
-                (_print "Camera #${idx} (${camera.x}, ${camera.y}, ${camera.width}x${camera.height})")
-                (_print "bgColor: ${camera.bgColor}")
-                (_print "--------------")
-                (logSprites camera null "" buf))
+                (unless (ignoreCameras.exists camera)
+                    (_print "Camera #${idx} (${camera.x}, ${camera.y}, ${camera.width}x${camera.height})")
+                    (_print "bgColor: ${camera.bgColor}")
+                    (_print "--------------")
+                    (logSprites camera null "" buf)))
             (return (buf.toString))))
     (unless group
         (set _idx 0)