kiss-lang/kiss-vscode
1
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases Wiki Activity

remove unnecessary withWritableEntry

Browse Source
This commit is contained in:
Nat Quayle Nelson
2021-09-29 17:24:47 -06:00
parent db896a6e9f
commit d367e04a35
2 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
projects/nat-archive-tool/src/nat/ArchiveController.kiss
View File

@@ -114,6 +114,8 @@
(lastCollector))) (lastCollector)))
// TODO SelectedEntry and SelectedEntries functions should be stateful and use the actual
// selected entries automatically
(defMacro defCommand [name args &body body] (defMacro defCommand [name args &body body]
(let [argPairs (let [argPairs
(groups (expList args) 2) (groups (expList args) 2)

9
projects/nat-archive-tool/src/nat/systems/ImageAttachmentSystem.kiss
View File

@@ -5,8 +5,7 @@
["jpg" "jpeg" "png"] ["jpg" "jpeg" "png"]
->[archive e imageFiles] ->[archive e imageFiles]
(unless (hasComponent e Images) (unless (hasComponent e Images)
(withWritableEntry archive e (addComponent archive e Images
(addComponent archive e Images (object
(object imageFiles imageFiles
imageFiles imageFiles pinnedImageIndex 0)))))
pinnedImageIndex 0))))))