loncom/metadata_database/LONCAPA/lonmetadata.pm - diff

Return to lonmetadata.pm CVS log

Up to [LON-CAPA] / loncom / metadata_database / LONCAPA

version 1.6, 2004/04/14 18:29:31	version 1.7, 2004/04/14 20:35:29
Line 572 sub process_dynamic_metadata {	Line 572 sub process_dynamic_metadata {
# put together comments	# put together comments
my $comments = '<div class="LCevalcomments">';	my $comments = '<div class="LCevalcomments">';
foreach my $evaluator (keys(%{$resdata->{'evaluation'}->{'comments'}})){	foreach my $evaluator (keys(%{$resdata->{'evaluation'}->{'comments'}})){
$comments .= '<span class="author">'.$evaluator.'</span>'.	$comments .=
'<span class="comment">'.	'<p>'.
$resdata->{'evaluation'}->{'comments'}->{$evaluator}.'</span>';	'<b>'.$evaluator.'</b>:'.
	$resdata->{'evaluation'}->{'comments'}->{$evaluator}.
	'</p>';
}	}
$comments .= '</div>';	$comments .= '</div>';
	$data{'comments'} = $comments;
#	#
return %data;	return %data;
}	}