From 98246ac53ac84831f21e63942cf134343847d305 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 3 Dec 2008 08:34:14 -0600 Subject: [PATCH] make ftp not depend on lib --- extra/ftp/server/server.factor | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/extra/ftp/server/server.factor b/extra/ftp/server/server.factor index 342c6a3c95..b0ec340202 100644 --- a/extra/ftp/server/server.factor +++ b/extra/ftp/server/server.factor @@ -7,8 +7,7 @@ namespaces make sequences ftp io.unix.launcher.parser unicode.case splitting assocs classes io.servers.connection destructors calendar io.timeouts io.streams.duplex threads continuations math concurrency.promises byte-arrays -io.backend sequences.lib tools.hexdump tools.files -io.streams.string ; +io.backend tools.hexdump tools.files io.streams.string ; IN: ftp.server TUPLE: ftp-client url mode state command-promise user password ; @@ -231,7 +230,7 @@ M: ftp-put service-command ( stream obj -- ) expect-connection [ "Entering Passive Mode (127,0,0,1," % - port>bytes [ number>string ] bi@ "," splice % + port>bytes [ number>string ] bi@ "," glue % ")" % ] "" make 227 swap server-response ;