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

remove too-specific mediaEntry commands

Browse Source
This commit is contained in:
Nat Quayle Nelson
2022-07-05 02:12:14 +00:00
parent 0eb0aad9e5
commit d9b3723c6b
1 changed files with 0 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -252,16 +252,6 @@
(flatten (for name names
(CreateTaggedEntry tags name))))
(defCommand CreateMediaEntry [medium (Text null) name (Text null)]
[(archive.createEntry ->e {
(addComponent archive e Name name)
(addTags archive e ["media" medium])})])
(defCommand CreateMediaEntries [medium (Text null) names (VarText null)]
// createEntry returns a list, so these lists must be flattened
(flatten (for name names
(CreateMediaEntry medium name))))
(defCommand CreateCircleEntry [radius (Number 0 null null)]
[(archive.createEntry ->e
(addComponent archive e Circle (objectWith radius)))])