|
Lines 75-86
if ( $op eq 'acct_form' ) {
Link Here
|
| 75 |
my $password = scalar $input->param('password'); |
75 |
my $password = scalar $input->param('password'); |
| 76 |
$password = $crypt->encrypt_hex($password); |
76 |
$password = $crypt->encrypt_hex($password); |
| 77 |
my $fields = { |
77 |
my $fields = { |
| 78 |
description => scalar $input->param('description'), |
78 |
description => scalar $input->param('description'), |
| 79 |
host => scalar $input->param('host'), |
79 |
host => scalar $input->param('host'), |
| 80 |
username => scalar $input->param('username'), |
80 |
username => scalar $input->param('username'), |
| 81 |
password => $password, |
81 |
password => $password, |
| 82 |
upload_port => scalar $input->param('upload_port') || $input->param('transport') eq 'FTP' ? 21 : 22, |
82 |
upload_port => scalar $input->param('upload_port') ? scalar $input->param('upload_port') |
| 83 |
download_port => scalar $input->param('download_port') || $input->param('transport') eq 'FTP' ? 21 : 22, |
83 |
: $input->param('transport') eq 'FTP' ? 21 |
|
|
84 |
: 22, |
| 85 |
download_port => scalar $input->param('download_port') ? scalar $input->param('download_port') |
| 86 |
: $input->param('transport') eq 'FTP' ? 21 |
| 87 |
: 22, |
| 84 |
vendor_id => scalar $input->param('vendor_id'), |
88 |
vendor_id => scalar $input->param('vendor_id'), |
| 85 |
upload_directory => scalar $input->param('upload_directory'), |
89 |
upload_directory => scalar $input->param('upload_directory'), |
| 86 |
download_directory => scalar $input->param('download_directory'), |
90 |
download_directory => scalar $input->param('download_directory'), |
| 87 |
- |
|
|