From 33478cdebdb7507b66591573b01e86cfd8692a0c Mon Sep 17 00:00:00 2001 From: Dmitry Zuikov Date: Tue, 18 Jul 2023 09:32:08 +0300 Subject: [PATCH] wip --- hbs2-core/lib/HBS2/Net/Proto/RefChan.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/hbs2-core/lib/HBS2/Net/Proto/RefChan.hs b/hbs2-core/lib/HBS2/Net/Proto/RefChan.hs index e634e87c..5ab2ba34 100644 --- a/hbs2-core/lib/HBS2/Net/Proto/RefChan.hs +++ b/hbs2-core/lib/HBS2/Net/Proto/RefChan.hs @@ -404,8 +404,7 @@ refChanUpdateProto self pc adapter msg = do _ -> Nothing - (peerKey, ptran) <- MaybeT $ pure $ unboxSignedBox0 @(ProposeTran e) @e proposed - + (peerKey0, ptran) <- MaybeT $ pure $ unboxSignedBox0 @(ProposeTran e) @e proposed debug $ "ACCEPT FROM:" <+> pretty (AsBase58 peerKey)