chat-cli: add mic directly in tab-list
::
++ tab-list
|= sole-id=@ta
- %+ turn tab-list:sh:tc
- |= [term=cord detail=tank]
- [(cat 3 ';' term) detail]
+ tab-list:sh:tc
::
++ on-command
|= [sole-id=@ta =command]
++ tab-list
^- (list [@t tank])
:~
- [%join leaf+";join ~ship/chat-name (glyph)"]
- [%leave leaf+";leave ~ship/chat-name"]
+ [';join' leaf+";join ~ship/chat-name (glyph)"]
+ [';leave' leaf+";leave ~ship/chat-name"]
::
- [%create leaf+";create [type] /chat-name (glyph)"]
- [%delete leaf+";delete /chat-name"]
- [%invite leaf+";invite /chat-name ~ships"]
- [%banish leaf+";banish /chat-name ~ships"]
+ [';create' leaf+";create [type] /chat-name (glyph)"]
+ [';delete' leaf+";delete /chat-name"]
+ [';invite' leaf+";invite /chat-name ~ships"]
+ [';banish' leaf+";banish /chat-name ~ships"]
::
- [%bind leaf+";bind [glyph] ~ship/chat-name"]
- [%unbind leaf+";unbind [glyph]"]
- [%what leaf+";what (~ship/chat-name) (glyph)"]
+ [';bind' leaf+";bind [glyph] ~ship/chat-name"]
+ [';unbind' leaf+";unbind [glyph]"]
+ [';what' leaf+";what (~ship/chat-name) (glyph)"]
::
- [%settings leaf+";settings"]
- [%set leaf+";set key (value)"]
- [%unset leaf+";unset key"]
+ [';settings' leaf+";settings"]
+ [';set' leaf+";set key (value)"]
+ [';unset' leaf+";unset key"]
::
- [%chats leaf+";chats"]
- [%help leaf+";help"]
+ [';chats' leaf+";chats"]
+ [';help' leaf+";help"]
==
:: +work: run user command
::
