diff --git a/basis/channels/remote/remote.factor b/basis/channels/remote/remote.factor index 6e10b23407..6f63b9bd4a 100644 --- a/basis/channels/remote/remote.factor +++ b/basis/channels/remote/remote.factor @@ -53,12 +53,12 @@ C: remote-channel M: remote-channel to ( value remote-channel -- ) [ [ \ to , id>> , , ] { } make ] keep - node>> "remote-channels" + node>> "remote-channels" swap send-synchronous no-channel = [ no-channel throw ] when ; M: remote-channel from ( remote-channel -- value ) [ [ \ from , id>> , ] { } make ] keep - node>> "remote-channels" + node>> "remote-channels" swap send-synchronous dup no-channel = [ no-channel throw ] when* ; [