--- loncom/homework/lonhomework.pm	2002/09/23 17:29:37	1.89
+++ loncom/homework/lonhomework.pm	2002/09/26 16:54:36	1.92
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Homework handler
 #
-# $Id: lonhomework.pm,v 1.89 2002/09/23 17:29:37 albertel Exp $
+# $Id: lonhomework.pm,v 1.92 2002/09/26 16:54:36 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -59,10 +59,14 @@ BEGIN {
 
 sub get_target {
   if ( $ENV{'request.state'} eq "published") {
-    if ( defined($ENV{'form.grade_target'}) 
+    if ( defined($ENV{'form.grade_target'}  ) 
+	 && ($ENV{'form.grade_target'} eq 'tex')) {
+      return ($ENV{'form.grade_target'});
+    } elsif ( defined($ENV{'form.grade_target'}  ) 
 	 && ($Apache::lonhomework::viewgrades == 'F' )) {
       return ($ENV{'form.grade_target'});
     }
+ 
     if ( defined($ENV{'form.submitted'})) {
       return ('grade', 'web');
     } else {
@@ -135,6 +139,8 @@ sub send_footer {
 
 $Apache::lonxml::browse='';
 
+# JB, 9/24/2002: Any changes in this function may require a change
+# in lonnavmaps::resource::getDateStatus.
 sub check_access {
   my ($id) = @_;
   my $date ='';
@@ -500,7 +506,7 @@ sub handler {
   #my $t0 = [&gettimeofday()];
   my $request=$_[0];
 
-  if ( $ENV{'user.name'} eq 'albertel' ) {$Apache::lonxml::debug=1;}
+#  if ( $ENV{'user.name'} eq 'albertel' ) {$Apache::lonxml::debug=1;}
 
   if (&setupheader($request)) { return OK; }
   $ENV{'request.uri'}=$request->uri;