PrintComponent catch nonexistent component error

2021-10-04 10:21:12 -06:00
parent a77b3f0155
commit ea409952ea
1 changed files with 4 additions and 1 deletions
--- a/projects/nat-archive-tool/src/nat/ArchiveController.kiss
+++ b/projects/nat-archive-tool/src/nat/ArchiveController.kiss
@@ -194,7 +194,10 @@
    
    (defCommand PrintComponent [entries (SelectedEntries null null)
                                    componentType (Text null)]
-        (doFor e entries (ui.displayMessage (dictGet e.components componentType))) [])
+        (doFor e entries
+            (if (e.components.exists componentType)
+                    (ui.displayMessage (dictGet e.components componentType))
+                (ui.displayMessage "Entry ${e.id} has no $componentType component"))) [])
        
    (defCommand CreateEntry [name (Text null)]
        [(archive.createEntry ->e