loncom/homework/optionresponse.pm - diff

Return to optionresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.126, 2005/06/07 01:33:19	version 1.128, 2005/06/21 21:00:55
Line 360 sub displayfoils {	Line 360 sub displayfoils {
if ($text=~/^\s*$/) {	if ($text=~/^\s*$/) {
$text=$value.$text;	$text=$value.$text;
} else {	} else {
$text=$value.': '.$text;	$text='<b>'.$value.':</b> '.$text;
}	}
} else {	} else {
$text=''.$text;	$text=''.$text;
Line 633 sub end_foil {	Line 633 sub end_foil {
my $name = &Apache::lonxml::get_param('name',$parstack,$safeeval);	my $name = &Apache::lonxml::get_param('name',$parstack,$safeeval);
&Apache::lonxml::debug("Got a name of :$name:");	&Apache::lonxml::debug("Got a name of :$name:");
if (!$name) {	if (!$name) {
&Apache::lonxml::error("Foils without names exist. This can cause problems to malfunction.");	&Apache::lonxml::warning("Foils without names exist. This can cause problems to malfunction.");
$name=$Apache::lonxml::curdepth;	$name=$Apache::lonxml::curdepth;
}	}
&Apache::lonxml::debug("Using a name of :$name:");	&Apache::lonxml::debug("Using a name of :$name:");