--- loncom/homework/structuretags.pm 2001/08/18 16:38:00 1.59
+++ loncom/homework/structuretags.pm 2001/08/20 15:47:22 1.61
@@ -2,7 +2,7 @@
# definition of tags that give a structure to a document
# 2/19 Guy
# 6/26/2001 fixed extra web display at end of tags
-# 8/17,8/18 Gerd Kortemeyer
+# 8/17,8/18,8/20 Gerd Kortemeyer
package Apache::structuretags;
@@ -98,6 +98,7 @@ sub start_problem {
my $token=$Apache::lonhomework::history{"resource.0.outtoken"};
if (($ENV{'form.doescheckout'}) && (!$token)) {
$token=&Apache::lonxml::maketoken();
+ $Apache::lonhomework.history{"resource.0.outtoken"}=$token;
}
$body_tag_start.=&Apache::lonxml::printtokenheader($target,$token);
}
@@ -146,8 +147,9 @@ Checking out resources is subject to cou
credit even if done erroneously.
ENDCHECKOUT
}