|
version 1.1315, 2016/07/25 19:50:44
|
version 1.1316, 2016/08/01 18:05:22
|
|
Line 235 sub get_servercerts_info {
|
Line 235 sub get_servercerts_info {
|
| if (grep { $_ eq $lonhost } ¤t_machine_ids()) { |
if (grep { $_ eq $lonhost } ¤t_machine_ids()) { |
| $uselocal = 1; |
$uselocal = 1; |
| } |
} |
| if (($context ne 'cgi') || $uselocal) { |
if (($context ne 'cgi') && ($uselocal)) { |
| my $distro = (split(/\:/,&get_server_distarch($lonhost)))[0]; |
my $distro = (split(/\:/,&get_server_distarch($lonhost)))[0]; |
| if ($distro =~ /^(?:centos|redhat|scientific)(\d+)$/) { |
if ($distro =~ /^(?:centos|redhat|scientific)(\d+)$/) { |
| if ($1 < 6) { |
if ($1 < 6) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonnet.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / lonnet / perl