removed unused stuff

diff --git a/tests/ftpserver.pl b/tests/ftpserver.pl
index 1a2e2b9..b4442c6 100644 (file)
--- a/tests/ftpserver.pl
+++ b/tests/ftpserver.pl
@@ -11,7 +11,6 @@
 #
 
 use Socket;
-use Carp;
 use FileHandle;
 
 use strict;
@@ -572,5 +571,4 @@ for ( $waitedpid = 0;
             
     } # while(1)
     close(Client);
-    close(Client2);
 }