Fix package.pl.
This commit is contained in:
parent
4c2f4095d2
commit
d77e4a1470
|
@ -67,7 +67,7 @@ for ($i = 0; $i <= $#packages; $i++) {
|
||||||
my ($ftp);
|
my ($ftp);
|
||||||
$ftp_path .= "/$major.$minor";
|
$ftp_path .= "/$major.$minor";
|
||||||
|
|
||||||
$ftp = Net::FTP->new($ftp_host, Debug => 0, Passive => 0)
|
$ftp = Net::FTP->new($ftp_host, Debug => 0, Passive => 1)
|
||||||
or die "Cannot connect to host $ftp_host: $@";
|
or die "Cannot connect to host $ftp_host: $@";
|
||||||
|
|
||||||
$ftp->login($ftp_user, $ftp_pass)
|
$ftp->login($ftp_user, $ftp_pass)
|
||||||
|
@ -100,4 +100,3 @@ $ftp->close();
|
||||||
print "Files sent to drop site -- build succeeded.\n";
|
print "Files sent to drop site -- build succeeded.\n";
|
||||||
|
|
||||||
exit(0);
|
exit(0);
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user