loncom/interface/lonhelper.pm - diff

Return to lonhelper.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.160, 2006/12/18 21:48:47	version 1.161, 2007/07/25 23:20:38
Line 1024 sub end_message {	Line 1024 sub end_message {
sub render {	sub render {
my $self = shift;	my $self = shift;

return &mtn($self->{MESSAGE_TEXT});	return $self->{MESSAGE_TEXT};
}	}
# If a NEXTSTATE was given, switch to it	# If a NEXTSTATE was given, switch to it
sub postprocess {	sub postprocess {
Line 1477 BUTTONS	Line 1477 BUTTONS
$choiceLabel = &$choiceLabel($helper, $self);	$choiceLabel = &$choiceLabel($helper, $self);
}	}
$result .= "/></td><td> ".qq{<label for="id$id">}.	$result .= "/></td><td> ".qq{<label for="id$id">}.
$choiceLabel. "</label></td>";	&mtn($choiceLabel). "</label></td>";
if ($choice->[4]) {	if ($choice->[4]) {
$result .='<td><input type="text" size="5" name="'	$result .='<td><input type="text" size="5" name="'
.$choice->[4].'_forminput" value="'	.$choice->[4].'_forminput" value="'