loncom/interface/lonparmset.pm - diff

Return to lonparmset.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.139, 2003/11/21 19:54:42	version 1.139.2.1, 2003/12/09 22:40:46
Line 1614 sub crsenv {	Line 1614 sub crsenv {
'default_enrollment_end_date',	'default_enrollment_end_date',
);	);
foreach my $parameter (sort(keys(%values))) {	foreach my $parameter (sort(keys(%values))) {
if (! $descriptions{$parameter}) {	unless ($parameter =~ m/^internal\./) {
$descriptions{$parameter}=$parameter;	if (! $descriptions{$parameter}) {
push(@Display_Order,$parameter);	$descriptions{$parameter}=$parameter;
}	push(@Display_Order,$parameter);
	}
	}
}	}
foreach my $parameter (@Display_Order) {	foreach my $parameter (@Display_Order) {
my $description = $descriptions{$parameter};	my $description = $descriptions{$parameter};