loncom/interface/domainprefs.pm - diff

Return to domainprefs.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.232, 2014/03/31 01:09:11	version 1.233, 2014/04/02 16:27:18
Line 2974 sub print_selfenrollment {	Line 2974 sub print_selfenrollment {
$datatable .= '</table></td></tr>';	$datatable .= '</table></td></tr>';
}	}
} elsif ($position eq 'bottom') {	} elsif ($position eq 'bottom') {
my ($itemsref,$namesref,$fieldsref) = &selfenroll_validation_types();	my ($itemsref,$namesref,$fieldsref) = &Apache::lonuserutils::selfenroll_validation_types();
my %currvalidation;	my %currvalidation;
if (ref($settings) eq 'HASH') {	if (ref($settings) eq 'HASH') {
if (ref($settings->{'validation'}) eq 'HASH') {	if (ref($settings->{'validation'}) eq 'HASH') {
Line 9376 sub modify_selfenrollment {	Line 9376 sub modify_selfenrollment {
default => 'Default settings',	default => 'Default settings',
validation => 'Validation of self-enrollment requests',	validation => 'Validation of self-enrollment requests',
);	);
my ($itemsref,$namesref,$fieldsref) = &selfenroll_validation_types();	my ($itemsref,$namesref,$fieldsref) = &Apache::lonuserutils::selfenroll_validation_types();

if (ref($ordered{'admin'}) eq 'ARRAY') {	if (ref($ordered{'admin'}) eq 'ARRAY') {
foreach my $item (@{$ordered{'admin'}}) {	foreach my $item (@{$ordered{'admin'}}) {