From f80418c94ac5185f4da0c1004ba9d196c67c3e26 Mon Sep 17 00:00:00 2001
From: Nat Quayle Nelson <natquaylenelson@gmail.com>
Date: Thu, 12 Aug 2021 18:49:36 -0600
Subject: [PATCH] Prelude.filter

---
 src/nat/systems/MediaWikiSystem.kiss | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/nat/systems/MediaWikiSystem.kiss b/src/nat/systems/MediaWikiSystem.kiss
index a42bac9..041d03f 100644
--- a/src/nat/systems/MediaWikiSystem.kiss
+++ b/src/nat/systems/MediaWikiSystem.kiss
@@ -44,6 +44,8 @@
 (method :Array<String> queryImageUrls [:Array<String> imageTitles]
     (flatten
         (for =>_id image (the haxe.DynamicAccess<Dynamic> .pages .query (query [=>"titles" imageTitles =>"prop" ["imageinfo"] =>"iiprop" ["url"]]))
-            (image.imageinfo.map ->image image.url))))
+            (if image.imageinfo
+                    (image.imageinfo.map ->image image.url)
+                []))))
 
 (var headers [=>"User-Agent" "NatArchiveTool/0.0.0 (https://github.com/NQNStudios/kisslang/tree/main/projects/nat-archive-tool; natquaylenelson@gmail.com) Requests/2.26.0"])
\ No newline at end of file