loncom/homework/inputtags.pm - diff

Return to inputtags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.72, 2002/11/06 22:40:29	version 1.73, 2002/11/08 20:34:10
Line 153 sub start_textline {	Line 153 sub start_textline {
my $partid=$Apache::inputtags::part;	my $partid=$Apache::inputtags::part;
my $id=$Apache::inputtags::response[-1];	my $id=$Apache::inputtags::response[-1];
my $oldresponse = &HTML::Entities::encode($Apache::lonhomework::history{"resource.$partid.$id.submission"});	my $oldresponse = &HTML::Entities::encode($Apache::lonhomework::history{"resource.$partid.$id.submission"});
$result= '<input type="text" name="HWVAL'.$id.'" value="'.	if ($Apache::lonhomework::type ne 'exam') {
$oldresponse.'" size="'.$size.'" maxlength="'.$maxlength.'" />';	$result= '<input type="text" name="HWVAL'.$id.'" value="'.
	$oldresponse.'" size="'.$size.'" maxlength="'.$maxlength.'" />';
	}
} else {	} else {
#right or wrong don't show what was last typed in.	#right or wrong don't show what was last typed in.
#$result='<i>'.$oldresponse.'</i>';	#$result='<i>'.$oldresponse.'</i>';