selectById

2022-07-05 01:08:13 +00:00
parent 58e14db450
commit feb5bda67b
1 changed files with 3 additions and 0 deletions
--- a/projects/nat-archive-tool/src/nat/SelectionCommands.kiss
+++ b/projects/nat-archive-tool/src/nat/SelectionCommands.kiss
@@ -58,6 +58,9 @@
 (defSelectCommand SelectAllEntries []
    (for =>id e archive.entries e))

+(defSelectCommand SelectById [id (Text null)]
+    (filter [(dictGet archive.entries id)]))
+
 (defSelectCommand SelectLastChangeSet []
    lastChangeSet)