From 500e0fbc9bd82f3d52552ef2a3912183e49cd4dc Mon Sep 17 00:00:00 2001
From: Daniel Ehrenberg <ehrenbed@carleton.edu>
Date: Tue, 26 Feb 2008 01:20:27 -0600
Subject: [PATCH] Fixing send

---
 extra/concurrency/distributed/distributed.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/concurrency/distributed/distributed.factor b/extra/concurrency/distributed/distributed.factor
index 029be9772c..f09c441d26 100755
--- a/extra/concurrency/distributed/distributed.factor
+++ b/extra/concurrency/distributed/distributed.factor
@@ -28,7 +28,7 @@ C: <remote-process> remote-process
 
 M: remote-process send ( message thread -- )
     { remote-process-id remote-process-node } get-slots
-    io.sockets:<client> [ 2array serialize ] with-stream ;
+    binary io.sockets:<client> [ 2array serialize ] with-stream ;
 
 M: thread (serialize) ( obj -- )
     thread-id local-node get-global