loncom/homework/randomlabel.pm - diff

Return to randomlabel.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.9, 2002/01/11 16:32:29	version 1.11, 2002/01/21 16:40:57
Line 60 package Apache::randomlabel;	Line 60 package Apache::randomlabel;
use strict;	use strict;
use Apache::edit;	use Apache::edit;

sub BEGIN {	BEGIN {
&Apache::lonxml::register('Apache::randomlabel',('randomlabel','labelgroup','location','label'));	&Apache::lonxml::register('Apache::randomlabel',('randomlabel','labelgroup','location','label'));
}	}

Line 315 sub start_label {	Line 315 sub start_label {
&Apache::edit::end_table();	&Apache::edit::end_table();
} elsif ($target eq 'modified') {	} elsif ($target eq 'modified') {
my $text=$$parser[-1]->get_text("/label");	my $text=$$parser[-1]->get_text("/label");
$result.=&Apache::edit::modifiedfield($token);	$result.='<label>'.&Apache::edit::modifiedfield($token);
}	}
return $result;	return $result;
}	}