--- loncom/homework/structuretags.pm	2001/08/17 15:51:00	1.56
+++ loncom/homework/structuretags.pm	2001/08/17 16:50:04	1.57
@@ -92,6 +92,11 @@ sub start_problem {
   my ($result,$head_tag_start,$body_tag_start)=
     &page_start($target,$token,$tagstack,$parstack,$parser,$safeeval);
 
+  if ($target eq 'web') {
+      if ($ENV{'form.doescheckout'}) {
+	  $body_tag_start.=&Apache::lonxml::maketoken('web');
+      }
+  }
   if ($target eq 'web' || $target eq 'grade') {
     ($status,$accessmsg) = &Apache::lonhomework::check_access('0');
     push (@Apache::inputtags::status,$status);
@@ -118,8 +123,8 @@ Checking out resources is subject to cou
 credit even if done erroneously.<p />
 </font>  
 <form method=post>
-<input type=submit name="does_checkout" 
-value="Check out Problem for Viewing" />
+<input type=submit name="doescheckout" 
+value="Check out Exam for Viewing" />
 </form>
 ENDCHECKOUT
         }