version 1.78, 2016/05/13 19:03:36
|
version 1.79, 2016/05/13 22:57:45
|
Line 2567 sub display_loncaparev_constraints {
|
Line 2567 sub display_loncaparev_constraints {
|
} |
} |
} |
} |
} |
} |
foreach my $item (keys(%Apache::lonrelrequtils::checkparmsmatch)) { |
foreach my $item (keys(%Apache::lonrelrequtils::checkparmvalsmatch)) { |
if (ref($Apache::lonrelrequtils::checkparmsmatch{$item}) eq 'ARRAY') { |
if (ref($Apache::lonrelrequtils::checkparmvalsmatch{$item}) eq 'ARRAY') { |
my $value = $resourcedata->{$key}; |
my $value = $resourcedata->{$key}; |
foreach my $valuematch (@{$Apache::lonrelrequtils::checkparmsmatch{$item}}) { |
foreach my $valuematch (@{$Apache::lonrelrequtils::checkparmvalsmatch{$item}}) { |
if ($value =~ /$valuematch/) { |
if ($value =~ /$valuematch/) { |
my $stdtype = &Apache::lonparmset::standard_parameter_types($item); |
my $stdtype = &Apache::lonparmset::standard_parameter_types($item); |
$found{$item}{'valname'} = &get_param_description($stdtype,$value,1); |
$found{$item}{'valname'} = &get_param_description($stdtype,$value,1); |