diff --git a/src/nat/ArchiveController.kiss b/src/nat/ArchiveController.kiss index 6cecdbb..8c3eca5 100644 --- a/src/nat/ArchiveController.kiss +++ b/src/nat/ArchiveController.kiss @@ -166,6 +166,10 @@ (defCommand SelectEntry [e OneEntry] (set selectedEntries [e]) []) + (defCommand ToggleEntrySelection [e OneEntry] + (unless (selectedEntries.remove e) + (selectedEntries.push e)) []) + (defCommand SelectEntries [entries (Entries null null)] (set selectedEntries entries) [])