loncom/homework/edit.pm - diff

Return to edit.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.54, 2003/06/09 22:42:49	version 1.55, 2003/06/10 18:39:08
Line 75 sub tag_end {	Line 75 sub tag_end {
my ($target,$token,$description) = @_;	my ($target,$token,$description) = @_;
my $result='';	my $result='';
if ($target eq 'edit') {	if ($target eq 'edit') {
my $tag=$token->[1];	$result.="</td></tr>".&end_table()."\n";
if (!defined($description)) {
$result.="</td></tr><tr><td></$tag></td><td colspan=\"2\"> </td>";
} else {
if ($description ne '') { $result.="</td></tr><tr><td>$description</td><td colspan=\"2\"> </td>"; }
}
$result.="</tr>".&end_table()."\n";
}	}
return $result;	return $result;
}	}