ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2025-01-07 15:38:45 +03:00
Code Issues Packages Projects Releases Wiki Activity

chat-hook: fix infinite loop from reconnecting to own dm

Browse Source
This commit is contained in:
Logan Allen 2020-10-01 21:27:57 -05:00
parent 2c0ddfa960
commit a968bb004b
1 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
pkg/arvo/app/chat-hook.hoon
View File

@ -92,6 +92,17 @@
?: ?=(%10 -.old) ?: ?=(%10 -.old)
[cards this(state old)] [cards this(state old)]
?: ?=(%9 -.old) ?: ?=(%9 -.old)
=. cards
%+ weld cards
^- (list card)
%+ roll ~(tap in ~(key by wex.bol))
|= [[=wire =ship =term] out=(list card)]
?> ?=([@ *] wire)
?. ?&(=(ship our.bol) =(term %chat-hook))
out
:_ out
=- [%pass / %agent [our.bol %chat-hook] %poke %chat-hook-action !>(-)]
[%remove t.wire]
=/ chat-keys=(set path) (scry-for (set path) %chat-store [%keys ~]) =/ chat-keys=(set path) (scry-for (set path) %chat-store [%keys ~])
=. cards =. cards
%+ weld cards %+ weld cards