1berry/webmin
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Allow port for FTP upload

Browse Source
This commit is contained in:
Jamie Cameron 2008-01-16 00:04:21 +00:00
parent d1a64b5dff
commit 36f87f8bf4
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
web-lib-funcs.pl
View File

@ -1701,7 +1701,7 @@ if (!$connected) {
return 1;
}
# ftp_upload(host, file, srcfile, [&error], [&callback], [user, pass])
# ftp_upload(host, file, srcfile, [&error], [&callback], [user, pass], [port])
# Upload data from a local file to an FTP site
sub ftp_upload
{
@ -1718,7 +1718,7 @@ local $SIG{ALRM} = "download_timeout";
alarm(60);
# connect to host and login
&open_socket($_[0], 21, "SOCK", $_[3]) || return 0;
&open_socket($_[0], $_[7] || 21, "SOCK", $_[3]) || return 0;
alarm(0);
if ($download_timed_out) {
if ($_[3]) { ${$_[3]} = $download_timed_out; return 0; }