From c6ab75e3f53338fd513b0374683dcd4458ebe036 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Wed, 14 May 2008 15:43:34 -0500
Subject: [PATCH] move remote-address to public

---
 extra/io/server/server.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/extra/io/server/server.factor b/extra/io/server/server.factor
index 23066114e4..e15e8c0039 100755
--- a/extra/io/server/server.factor
+++ b/extra/io/server/server.factor
@@ -8,12 +8,12 @@ IN: io.server
 
 SYMBOL: servers
 
+SYMBOL: remote-address
+
 <PRIVATE
 
 LOG: accepted-connection NOTICE
 
-SYMBOL: remote-address
-
 : with-connection ( client remote quot -- )
     '[
         , [ remote-address set ] [ accepted-connection ] bi