loncom/homework/randomlabel.pm - diff

Return to randomlabel.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.13, 2002/02/07 16:45:06	version 1.14, 2002/02/14 21:37:26
Line 307 sub start_label {	Line 307 sub start_label {
if ($target eq 'web' \|\| $target eq 'tex' \|\|	if ($target eq 'web' \|\| $target eq 'tex' \|\|
$target eq 'grade' \|\| $target eq 'answer') {	$target eq 'grade' \|\| $target eq 'answer') {
my $ltext=&Apache::lonxml::get_all_text("/label",$$parser[-1]);	my $ltext=&Apache::lonxml::get_all_text("/label",$$parser[-1]);
	$ltext=&Apache::run::evaluate($ltext,$safeeval,$$parstack[-1]);
push(@Apache::randomlabel::label_arr,$ltext);	push(@Apache::randomlabel::label_arr,$ltext);
} elsif ($target eq 'edit') {	} elsif ($target eq 'edit') {
$result.=&Apache::edit::tag_start($target,$token);	$result.=&Apache::edit::tag_start($target,$token);