ftp.server: remove MAIN: word, since it expected a parameter from the stack and main words must have effect ( -- ) (reported by Alec Barryman)

2010-07-31 18:33:26 -04:00 · 2010-07-31 18:33:26 -04:00 · 1a137e9b5d
parent 5fd5ed4afe
commit 1a137e9b5d
1 changed files with 0 additions and 4 deletions
--- a/basis/ftp/server/server.factor
+++ b/basis/ftp/server/server.factor
@ -349,8 +349,4 @@ M: ftp-server handle-client* ( server -- )
 : ftpd ( directory port -- )
    <ftp-server> start-server ;

-: ftpd-main ( path -- ) 2100 ftpd ;
-
-MAIN: ftpd-main
-
 ! sudo tcpdump -i en1 -A -s 10000  tcp port 21