show the ftp server invoke line when -d is used
This commit is contained in:
parent
4646a1ffa9
commit
1717963e3d
@ -154,6 +154,10 @@ sub runftpserver {
|
|||||||
|
|
||||||
if ($RUNNING != 1) {
|
if ($RUNNING != 1) {
|
||||||
my $flag=$debugprotocol?"-v ":"";
|
my $flag=$debugprotocol?"-v ":"";
|
||||||
|
if($debugprotocol) {
|
||||||
|
print "* Starts ftp server verbose:\n";
|
||||||
|
print "perl $srcdir/ftpserver.pl $flag $FTPPORT &\n";
|
||||||
|
}
|
||||||
system("perl $srcdir/ftpserver.pl $flag $FTPPORT &");
|
system("perl $srcdir/ftpserver.pl $flag $FTPPORT &");
|
||||||
sleep 1; # give it a little time to start
|
sleep 1; # give it a little time to start
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user