Lines 491-497
Link Here
|
491 |
|
491 |
|
492 |
push_el(\@main::el, 'ask_admin_email()', 'Starting...'); |
492 |
push_el(\@main::el, 'ask_admin_email()', 'Starting...'); |
493 |
|
493 |
|
494 |
my $qmsg = "\n Please enter admininistrator email address: "; |
494 |
my $qmsg = "\n Please enter administrator email address: "; |
495 |
|
495 |
|
496 |
print STDOUT $qmsg; |
496 |
print STDOUT $qmsg; |
497 |
|
497 |
|
Lines 1352-1358
Link Here
|
1352 |
|
1352 |
|
1353 |
return $rs if ($rs != 0); |
1353 |
return $rs if ($rs != 0); |
1354 |
|
1354 |
|
1355 |
sys_command_rs("/usr/sbin/a2ensite vhcs2.conf &> /tmp/vhcs2-setup-services.log"); |
1355 |
# sys_command_rs("/usr/sbin/a2ensite vhcs2.conf &> /tmp/vhcs2-setup-services.log"); |
1356 |
|
1356 |
|
1357 |
|
1357 |
|
1358 |
# |
1358 |
# |
Lines 1838-1848
Link Here
|
1838 |
|
1838 |
|
1839 |
push_el(\@main::el, 'setup_vhcs2d()', 'Starting...'); |
1839 |
push_el(\@main::el, 'setup_vhcs2d()', 'Starting...'); |
1840 |
|
1840 |
|
1841 |
sys_command_rs("$main::cfg{'CMD_CHOWN'} root:root $main::cfg{'CMD_VHCS2D'} $main::cfg{'CMD_VHCS2N'} &> /tmp/vhcs2-setup-services.log"); |
|
|
1842 |
|
1841 |
|
1843 |
sys_command_rs("/usr/chmod 0755 $main::cfg{'CMD_VHCS2D'} $main::cfg{'CMD_VHCS2N'} &> /tmp/vhcs2-setup-services.log"); |
1842 |
# sys_command_rs("$main::cfg{'CMD_CHOWN'} root:root $main::cfg{'CMD_VHCS2D'} $main::cfg{'CMD_VHCS2N'} &> /tmp/vhcs2-setup-services.log"); |
1844 |
|
1843 |
|
1845 |
sys_command_rs("update-rc.d vhcs2_daemon defaults 99 &> /tmp/vhcs2-setup-services.log"); |
1844 |
# sys_command_rs("/usr/chmod 0755 $main::cfg{'CMD_VHCS2D'} $main::cfg{'CMD_VHCS2N'} &> /tmp/vhcs2-setup-services.log"); |
|
|
1845 |
|
1846 |
# sys_command_rs("update-rc.d vhcs2_daemon defaults 99 &> /tmp/vhcs2-setup-services.log"); |
1846 |
|
1847 |
|
1847 |
sys_command_rs("$main::cfg{'CMD_VHCS2D'} stop &> /tmp/vhcs2-setup-services.log"); |
1848 |
sys_command_rs("$main::cfg{'CMD_VHCS2D'} stop &> /tmp/vhcs2-setup-services.log"); |
1848 |
|
1849 |
|