*** ftp.pl.old Wed Sep 1 23:11:11 1999
--- ftp.pl Wed Sep 1 23:12:43 1999
***************
*** 587,592 ****
--- 587,595 ----
return 0;
}
+ # shut down our end of the socket
+ &close_data_socket;
+
# read the close
#
$ret = &expect($timeout,
***************
*** 596,604 ****
$ret = 0;
}
- # shut down our end of the socket
- &close_data_socket;
-
if( ! $ret ){
return 0;
}
--- 599,604 ----
