voidlizard
/
hbs2
mirror of https://github.com/voidlizard/hbs2
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

collect own messages in rechannotify log

This commit is contained in:
Dmitry Zuikov 2023-12-20 06:48:29 +03:00
parent d65216cc76
commit 2ef2bb493c
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
hbs2-core/lib/HBS2/Net/Proto/RefChan.hs
View File

@ -913,8 +913,7 @@ refChanNotifyProto self adapter msg@(Notify rchan box) = do
debug $ "^^^ CALL refChanNotifyRely" <+> pretty h0
lift $ refChanNotifyRely adapter rchan msg
debug $ "FUCKING EMIT RefChanNotifyEventKey" <+> pretty (AsBase58 rchan)
lift $ emit @e (RefChanNotifyEventKey rchan) (RefChanNotifyEvent (HashRef h0) msg)
lift $ emit @e (RefChanNotifyEventKey rchan) (RefChanNotifyEvent (HashRef h0) msg)
where
proto = Proxy @(RefChanNotify e)