Fix package.pl.

This commit is contained in:
David Anderson 2014-03-11 19:54:37 -07:00
parent 4c2f4095d2
commit d77e4a1470

View File

@ -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);