--- loncom/homework/lonhomework.pm 2003/09/09 13:32:25 1.139 +++ loncom/homework/lonhomework.pm 2003/09/17 18:16:39 1.144 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Homework handler # -# $Id: lonhomework.pm,v 1.139 2003/09/09 13:32:25 sakharuk Exp $ +# $Id: lonhomework.pm,v 1.144 2003/09/17 18:16:39 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -69,9 +69,6 @@ sub get_target { } elsif ( defined($ENV{'form.grade_target'} ) && ($Apache::lonhomework::viewgrades eq 'F' )) { return ($ENV{'form.grade_target'}); - } elsif (defined($ENV{'form.grade_target'} ) - && ($ENV{'form.grade_target'} eq 'answer')) { - return ($ENV{'form.grade_target'}); } if ( defined($ENV{'form.submitted'}) && @@ -660,7 +657,10 @@ sub handler { # if we are browsing we might not be able to know where we are if ($Apache::lonhomework::browse ne 'F') { #should know where we are, so ask - $request->internal_redirect('/adm/ambiguous'); return; + if ( &Apache::lonnet::mod_perl_version() == 2 ) { + &Apache::lonnet::cleanenv(); + } + $request->internal_redirect('/adm/ambiguous'); return; } }