version 1.262, 2005/10/26 21:42:10
|
version 1.263, 2005/11/04 20:08:09
|
Line 2753 ENDMAINFORMHEAD
|
Line 2753 ENDMAINFORMHEAD
|
sub output_row { |
sub output_row { |
my ($r, $field_name, $field_text) = @_; |
my ($r, $field_name, $field_text) = @_; |
my $output; |
my $output; |
my $options=$env{'course.'.$env{'request.course.id'}.'.'.$field_name.'.options'}; |
my $options=$env{'course.'.$env{'request.course.id'}.'.metadata.'.$field_name.'.options'}; |
my $values=$env{'course.'.$env{'request.course.id'}.'.'.$field_name.'.values'}; |
my $values=$env{'course.'.$env{'request.course.id'}.'.metadata.'.$field_name.'.values'}; |
my $checked; |
my $checked; |
unless (defined($options)) { |
unless (defined($options)) { |
$options = 'active,stuadd'; |
$options = 'active,stuadd'; |