Fix channels.remote to/from words

[factor.git] / basis / channels / remote / remote.factor

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