diff --git a/projects/nat-archive-tool/src/nat/ArchiveController.kiss b/projects/nat-archive-tool/src/nat/ArchiveController.kiss index 24e998cd..86e4bcdb 100644 --- a/projects/nat-archive-tool/src/nat/ArchiveController.kiss +++ b/projects/nat-archive-tool/src/nat/ArchiveController.kiss @@ -273,6 +273,12 @@ (defCommand AddDLURL [e SelectedEntry url (Text null)] (addComponent archive e DLURL url)) + (defCommand AddYoutubeMusic [name (Text null) url (Text null)] + [(archive.createEntry ->e + {(addComponent archive e Name name) + (addTags archive e ["music"]) + (AddDLURL e url)})]) + (defCommand AddKeyShortcut [e SelectedEntry description (Text null)] (addComponent archive e KeyShortcut description))