version 1.2, 2013/02/14 14:18:27
|
version 1.3, 2013/10/02 23:47:17
|
Line 84 my ($distro,$send,$message);
|
Line 84 my ($distro,$send,$message);
|
my $loncaparev = &Apache::lonnet::get_server_loncaparev($defdom); |
my $loncaparev = &Apache::lonnet::get_server_loncaparev($defdom); |
my ($version,$timestamp) = split(/\-/,$loncaparev); |
my ($version,$timestamp) = split(/\-/,$loncaparev); |
if ($loncaparev =~ /CVS_HEAD/) { |
if ($loncaparev =~ /CVS_HEAD/) { |
$message = &Apache::lonlocal::mt('Code checking unavailable for LON-CAPA CVS HEAD.')."\n"; |
$message = &Apache::lonlocal::mt('Code checking unavailable for LON-CAPA CVS HEAD')."\n"; |
} else { |
} else { |
# Get Linux distro |
# Get Linux distro |
if (open(PIPE, "$londaemons/distprobe |")) { |
if (open(PIPE, "$londaemons/distprobe |")) { |