version 1.62, 2001/08/20 15:56:47
|
version 1.64, 2001/08/20 19:27:26
|
Line 101 sub start_problem {
|
Line 101 sub start_problem {
|
$Apache::lonhomework::history{"resource.0.outtoken"}=$token; |
$Apache::lonhomework::history{"resource.0.outtoken"}=$token; |
} |
} |
$body_tag_start.=&Apache::lonxml::printtokenheader($target,$token); |
$body_tag_start.=&Apache::lonxml::printtokenheader($target,$token); |
if ($ENV{'user.adv'}) { |
|
$body_tag_start.=&Apache::lonxml::tokeninputfield; |
|
} |
|
} |
|
if ($target eq 'meta') { |
|
|
|
return (<<ENDSTORES); |
|
<stores part="0" name="outtoken" type="string" |
|
display="Document ID checked out"></stores> |
|
<stores part="0" name="checkouttime" type="date" |
|
display="Time checked out"></stores> |
|
<stores part="0" name="outremote" type="string" |
|
display="Client IP checked out from"></stores> |
|
|
|
<stores part="0" name="intoken" type="string" |
|
display="Document ID checked in"></stores> |
|
<stores part="0" name="checkintime" type="date" |
|
display="Time checked in"></stores> |
|
<stores part="0" name="inremote" type="string" |
|
display="Client IP checked in from"></stores> |
|
ENDSTORES |
|
} |
} |
} |
} |
if ($target eq 'web' || $target eq 'grade') { |
if ($target eq 'web' || $target eq 'grade') { |