ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-09-20 23:18:00 +03:00
Code Issues Packages Projects Releases Wiki Activity

chat-cli: Add debug poke for connecting to store

Browse Source
This commit is contained in:
Fang 2019-10-07 20:46:35 +02:00
parent 03b5a1cd71
commit 12050d44a8
No known key found for this signature in database
GPG Key ID: EB035760C1BBA972
1 changed files with 14 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
pkg/arvo/app/chat-cli.hoon
View File

@ -80,12 +80,17 @@
~& %chat-cli-prep ~& %chat-cli-prep
?^ old ?^ old
[~ this(+<+ u.old)] [~ this(+<+ u.old)]
:- [ost.bowl %peer /chat-store [our-self %chat-store] /all]~ :- [connect ~]
%_ this %_ this
audience [[our-self /] ~ ~] audience [[our-self /] ~ ~]
settings (sy %showtime %notify ~) settings (sy %showtime %notify ~)
width 80 width 80
== ==
:: +connect: connect to the chat-store
::
++ connect
^- move
[ost.bowl %peer /chat-store [our-self %chat-store] /all]
:: +true-self: moons to planets :: +true-self: moons to planets
:: ::
++ true-self ++ true-self
@ -112,6 +117,14 @@
=+ who=(slaw %p i.path) =+ who=(slaw %p i.path)
?~ who [our-self path] ?~ who [our-self path]
[u.who path] [u.who path]
:: +poke-noun: debug helpers
::
++ poke-noun
|= a=*
^- (quip move _this)
?: ?=(%connect a)
[[connect ~] this]
[~ this]
:: +poke-sole-action: handle cli input :: +poke-sole-action: handle cli input
:: ::
++ poke-sole-action ++ poke-sole-action