loncom/interface/lonparmset.pm - diff

Return to lonparmset.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.533, 2013/06/26 21:22:39	version 1.535, 2013/06/27 18:22:07
Line 2209 sub assessparms {	Line 2209 sub assessparms {
($chostname,$cmajor,$cminor) = &parameter_release_vars();	($chostname,$cmajor,$cminor) = &parameter_release_vars();
$got_chostname = 1;	$got_chostname = 1;
}	}
$needsnewer = &parameter_releasecheck($name,$values[$i],	$needsnewer = &parameter_releasecheck($name,$val,
$needsrelease,	$needsrelease,
$chostname,	$chostname,
$cmajor,$cminor);	$cmajor,$cminor);
Line 4709 sub oldversion_warning {	Line 4709 sub oldversion_warning {
);	);
if (exists($stringtypes{$name})) {	if (exists($stringtypes{$name})) {
if ($name eq 'examcode') {	if ($name eq 'examcode') {
	$desc = $value;
} elsif (ref($strings{$stringtypes{$name}}) eq 'ARRAY') {	} elsif (ref($strings{$stringtypes{$name}}) eq 'ARRAY') {
foreach my $possibilities (@{ $strings{$stringtypes{$name}} }) {	foreach my $possibilities (@{ $strings{$stringtypes{$name}} }) {
next unless (ref($possibilities) eq 'ARRAY');	next unless (ref($possibilities) eq 'ARRAY');