--- loncom/homework/structuretags.pm	2001/08/18 16:08:34	1.58
+++ 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 <web></web> tags
-# 8/17,8/18 Gerd Kortemeyer
+# 8/17,8/18,8/20 Gerd Kortemeyer
 
 package Apache::structuretags; 
 
@@ -98,26 +98,26 @@ 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);
       }
       if ($target eq 'meta') {
-	  print "Cool, I was called";
-
+     
 	  return (<<ENDSTORES);
 <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"
- display="Time checked out" />
+ display="Time checked out"></stores>
 <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" 
- display="Document ID checked in" />
+ display="Document ID checked in"></stores>
 <stores part="0" name="checkintime" type="date"
- display="Time checked in" />
+ display="Time checked in"></stores>
 <stores part="0" name="inremote" type="string" 
- display="Client IP checked in from" />
+ display="Client IP checked in from"></stores>
 ENDSTORES
       }
   }
@@ -147,8 +147,9 @@ Checking out resources is subject to cou
 credit even if done erroneously.<p />
 </font>  
 <form method=post>
-<input type=submit name="doescheckout" 
-value="Check out Exam for Viewing" />
+<input type=button name="doescheckout" 
+value="Check out Exam for Viewing" 
+onClick="if (confirm('Check out Exam?')) { this.form.submit(); }" />
 </form>
 ENDCHECKOUT
         }