--- loncom/homework/structuretags.pm	2002/04/10 19:58:19	1.89
+++ loncom/homework/structuretags.pm	2002/04/25 21:38:09	1.92
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA 
 # definition of tags that give a structure to a document
 #
-# $Id: structuretags.pm,v 1.89 2002/04/10 19:58:19 albertel Exp $
+# $Id: structuretags.pm,v 1.92 2002/04/25 21:38:09 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -150,11 +150,10 @@ permanent record is left in the system.<
 <font color=red>
 Checking out resources is subject to course policies, and may exclude future
 credit even if done erroneously.<p />
-</font>  
-<form method=post>
-<input type=button name="doescheckout" 
-value="Check out Exam for Viewing" 
-onClick="if (confirm('Check out Exam?')) { this.form.submit(); }" />
+</font>
+<form name="checkout" method="POST" action="$ENV{'request.uri'}">
+<input type="hidden" name="doescheckout" value="yes" />
+<input type="button" name="checkoutbutton" value="Check out Exam for Viewing" onClick="javascript:if (confirm('Check out Exam?')) { document.checkout.submit(); }" />
 </form>
 ENDCHECKOUT
 }
@@ -315,7 +314,8 @@ sub end_problem {
     if ( $target eq 'grade' && $Apache::inputtags::part eq '0') {
       # if part is zero, no <part>s existed, so we need to the grading
       &Apache::inputtags::grade;
-    } elsif ( $target eq 'web' && $Apache::inputtags::part eq '0') {
+    } elsif ( $target eq 'web' && $Apache::inputtags::part eq '0' && 
+	      $status ne 'UNCHECKEDOUT') {
       # if part is zero, no <part>s existed, so we need show the current 
       # grading status
       $result.= &Apache::inputtags::gradestatus($Apache::inputtags::part);
@@ -326,7 +326,8 @@ sub end_problem {
        ) {
       if ($status eq 'CAN_ANSWER') {
 	$result.="</form></body>\n"; 
-      } elsif ($status eq 'SHOW_ANSWER' || $status eq 'CANNOT_ANSWER') {
+      } elsif ($status eq 'SHOW_ANSWER' || $status eq 'CANNOT_ANSWER' ||
+	       $status eq 'UNCHECKEDOUT' ) {
 	$result.="</body>\n";
       }
       $result.=&Apache::lonxml::xmlend();
@@ -338,13 +339,6 @@ sub end_problem {
   } elsif ($target eq 'meta') {
     if ($Apache::inputtags::part eq '0') {
       $result=&Apache::response::mandatory_part_meta;
-    } else {
-      # there were intervening parts need to set the global temporarily
-      # and only need the package reference
-      my $temp=$Apache::inputtags::part;
-      $Apache::inputtags::part=0;
-      $result=&Apache::response::meta_package_write('part');
-      $Apache::inputtags::part=$temp;
     }
   } elsif ($target eq 'edit') {
     &Apache::lonxml::debug("in end_problem with $target, edit");
@@ -538,7 +532,11 @@ sub start_part {
       }
     }
   }
-  return '';
+  if ($target eq 'tex') {
+      return '\\\\';
+  } else {
+      return '';
+  }
 }
 
 sub end_part {