WIP archive controllers
This commit is contained in:
12
src/nat/ArchiveController.kiss
Normal file
12
src/nat/ArchiveController.kiss
Normal file
@@ -0,0 +1,12 @@
|
||||
(defmethod selectEntry [:Entry e]
|
||||
(set selectedEntries [e]))
|
||||
|
||||
(defmethod selectEntries [:Array<Entry> e]
|
||||
(set selectedEntries e))
|
||||
|
||||
(defnew [&prop :Archive archive
|
||||
&prop :ArchiveUI ui]
|
||||
[&mut :Array<Entry> selectedEntries []
|
||||
:Map<String,Command> commands (new Map)]
|
||||
|
||||
)
|
||||
Reference in New Issue
Block a user