loncom/homework/structuretags.pm - diff

Return to structuretags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.58, 2001/08/18 16:08:34	version 1.59, 2001/08/18 16:38:00
Line 102 sub start_problem {	Line 102 sub start_problem {
$body_tag_start.=&Apache::lonxml::printtokenheader($target,$token);	$body_tag_start.=&Apache::lonxml::printtokenheader($target,$token);
}	}
if ($target eq 'meta') {	if ($target eq 'meta') {
print "Cool, I was called";

return (<<ENDSTORES);	return (<<ENDSTORES);
<stores part="0" name="outtoken" type="string"	<stores part="0" name="outtoken" type="string"
display="Document ID checked out" />	display="Document ID checked out"></stores>
<stores part="0" name="checkouttime" type="date"	<stores part="0" name="checkouttime" type="date"
display="Time checked out" />	display="Time checked out"></stores>
<stores part="0" name="outremote" type="string"	<stores part="0" name="outremote" type="string"
display="Client IP checked out from" />	display="Client IP checked out from"></stores>

<stores part="0" name="intoken" type="string"	<stores part="0" name="intoken" type="string"
display="Document ID checked in" />	display="Document ID checked in"></stores>
<stores part="0" name="checkintime" type="date"	<stores part="0" name="checkintime" type="date"
display="Time checked in" />	display="Time checked in"></stores>
<stores part="0" name="inremote" type="string"	<stores part="0" name="inremote" type="string"
display="Client IP checked in from" />	display="Client IP checked in from"></stores>
ENDSTORES	ENDSTORES
}	}
}	}