loncom/interface/lonhelper.pm - diff

Return to lonhelper.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.82, 2004/06/02 14:55:50	version 1.84, 2004/08/03 18:41:20
Line 1271 BUTTONS	Line 1271 BUTTONS
$choiceLabel = eval($choiceLabel);	$choiceLabel = eval($choiceLabel);
$choiceLabel = &$choiceLabel($helper, $self);	$choiceLabel = &$choiceLabel($helper, $self);
}	}
&Apache::lonnet::logthis("TITLE TRANSLATION >$choiceLabel<");
$result .= "/></td><td> " . &mtn($choiceLabel) . "</td></tr>\n";	$result .= "/></td><td> " . &mtn($choiceLabel) . "</td></tr>\n";
}	}
$result .= "</table>\n\n\n";	$result .= "</table>\n\n\n";
Line 2189 BUTTONS	Line 2188 BUTTONS
}	}

my $name = $self->{'coursepersonnel'} ? &mt('Name') : &mt('Student Name');	my $name = $self->{'coursepersonnel'} ? &mt('Name') : &mt('Student Name');
&Apache::lonnet::logthis("THE NAME IS >$name<");
my $type = 'radio';	my $type = 'radio';
if ($self->{'multichoice'}) { $type = 'checkbox'; }	if ($self->{'multichoice'}) { $type = 'checkbox'; }
$result .= "<table cellspacing='2' cellpadding='2' border='0'>\n";	$result .= "<table cellspacing='2' cellpadding='2' border='0'>\n";
Line 2801 be able to call methods on it.	Line 2799 be able to call methods on it.

=cut	=cut

	use Apache::lonlocal;

BEGIN {	BEGIN {
&Apache::lonhelper::register('Apache::lonhelper::general',	&Apache::lonhelper::register('Apache::lonhelper::general',
'exec', 'condition', 'clause',	'exec', 'condition', 'clause',