version 1.61, 2019/12/03 04:55:08
|
version 1.63, 2020/05/01 14:13:31
|
Line 357 sub get_hostname {
|
Line 357 sub get_hostname {
|
} |
} |
|
|
# |
# |
# get_hostname() prompts the user to provide the server's IPv4 IP address |
# get_hostip() prompts the user to provide the server's IPv4 IP address |
# |
# |
# If invalid input is provided, the routine is called recursively |
# If invalid input is provided, the routine is called recursively |
# until, a valid IPv4 address is provided. |
# until, a valid IPv4 address is provided. |
Line 421 sub check_prerequisites {
|
Line 421 sub check_prerequisites {
|
|
|
sub check_locale { |
sub check_locale { |
my ($distro) = @_; |
my ($distro) = @_; |
my ($fh,$langvar,$command); |
my ($fh,$langvar,$command,$earlyout); |
$langvar = 'LANG'; |
$langvar = 'LANG'; |
if ($distro =~ /^(ubuntu|debian)/) { |
if ($distro =~ /^(ubuntu|debian)/) { |
if (!open($fh,"</etc/default/locale")) { |
if (!open($fh,"</etc/default/locale")) { |
print &mt('Failed to open: [_1], default locale not checked.', |
print &mt('Failed to open: [_1], default locale not checked.', |
'/etc/default/locale'); |
'/etc/default/locale'); |
|
$earlyout = 1; |
} |
} |
} elsif ($distro =~ /^(suse|sles)(\d+)/) { |
} elsif ($distro =~ /^(suse|sles)(\d+)/) { |
if (($1 eq 'sles') && ($2 >= 15)) { |
if (($1 eq 'sles') && ($2 >= 15)) { |
if (!open($fh,"</etc/locale.conf")) { |
if (!open($fh,"</etc/locale.conf")) { |
print &mt('Failed to open: [_1], default locale not checked.', |
print &mt('Failed to open: [_1], default locale not checked.', |
'/etc/locale.conf'); |
'/etc/locale.conf'); |
|
$earlyout = 1; |
} |
} |
} else { |
} else { |
if (!open($fh,"</etc/sysconfig/language")) { |
if (!open($fh,"</etc/sysconfig/language")) { |
print &mt('Failed to open: [_1], default locale not checked.', |
print &mt('Failed to open: [_1], default locale not checked.', |
'/etc/sysconfig/language'); |
'/etc/sysconfig/language'); |
|
$earlyout = 1; |
} |
} |
$langvar = 'RC_LANG'; |
$langvar = 'RC_LANG'; |
} |
} |
Line 446 sub check_locale {
|
Line 449 sub check_locale {
|
if (!open($fh,"</etc/locale.conf")) { |
if (!open($fh,"</etc/locale.conf")) { |
print &mt('Failed to open: [_1], default locale not checked.', |
print &mt('Failed to open: [_1], default locale not checked.', |
'/etc/locale.conf'); |
'/etc/locale.conf'); |
|
$earlyout = 1; |
} |
} |
} elsif (!open($fh,"</etc/sysconfig/i18n")) { |
} elsif (!open($fh,"</etc/sysconfig/i18n")) { |
print &mt('Failed to open: [_1], default locale not checked.', |
print &mt('Failed to open: [_1], default locale not checked.', |
Line 456 sub check_locale {
|
Line 460 sub check_locale {
|
if (!open($fh,"</etc/locale.conf")) { |
if (!open($fh,"</etc/locale.conf")) { |
print &mt('Failed to open: [_1], default locale not checked.', |
print &mt('Failed to open: [_1], default locale not checked.', |
'/etc/locale.conf'); |
'/etc/locale.conf'); |
|
$earlyout = 1; |
} |
} |
} elsif (!open($fh,"</etc/sysconfig/i18n")) { |
} elsif (!open($fh,"</etc/sysconfig/i18n")) { |
print &mt('Failed to open: [_1], default locale not checked.', |
print &mt('Failed to open: [_1], default locale not checked.', |
'/etc/sysconfig/i18n'); |
'/etc/sysconfig/i18n'); |
|
$earlyout = 1; |
} |
} |
} else { |
} else { |
if (!open($fh,"</etc/sysconfig/i18n")) { |
if (!open($fh,"</etc/sysconfig/i18n")) { |
print &mt('Failed to open: [_1], default locale not checked.', |
print &mt('Failed to open: [_1], default locale not checked.', |
'/etc/sysconfig/i18n'); |
'/etc/sysconfig/i18n'); |
|
$earlyout = 1; |
} |
} |
} |
} |
|
return if ($earlyout); |
my @data = <$fh>; |
my @data = <$fh>; |
chomp(@data); |
chomp(@data); |
foreach my $item (@data) { |
foreach my $item (@data) { |
Line 3376 wget http://install.loncapa.org/versions
|
Line 3384 wget http://install.loncapa.org/versions
|
print &mt('LON-CAPA source files extracted.')."\n". |
print &mt('LON-CAPA source files extracted.')."\n". |
&mt('It remains for you to execute the following commands:')." |
&mt('It remains for you to execute the following commands:')." |
|
|
cd /root/loncapa-N.N (N.N should correspond to a version number like '0.4') |
cd /root/loncapa-X.Y.Z (X.Y.Z should correspond to a version number like '2.11.3') |
./UPDATE |
./UPDATE |
|
|
".&mt('If you have any trouble, please see [_1] and [_2]', |
".&mt('If you have any trouble, please see [_1] and [_2]', |