--- loncom/homework/lonhomework.pm 2001/08/22 19:21:36 1.58 +++ loncom/homework/lonhomework.pm 2001/10/31 17:44:42 1.61 @@ -10,6 +10,7 @@ use Apache::lonxml; use Apache::lonnet; use Apache::inputtags; use Apache::structuretags; +use Apache::randomlabel; use Apache::response; use Apache::hint; use Apache::outputtags; @@ -37,9 +38,9 @@ sub get_target { } else { if ( $ENV{'form.problemmode'} eq 'View' ) { if ( defined $ENV{'form.submitted'}) { - return ('grade', 'web'); + return ('grade', 'web','answer'); } else { - return ('web'); + return ('web','answer'); } } elsif ( $ENV{'form.problemmode'} eq 'Edit' ) { if ( $ENV{'form.submitted'} eq 'edit' ) { @@ -175,6 +176,7 @@ sub setupheader { } else { $request->content_type('text/html'); } + &Apache::loncommon::no_cache($request); $request->send_http_header; return OK if $request->header_only; return '' @@ -228,7 +230,6 @@ sub renderpage { if ($target eq 'web') { if (&Apache::lonnet::symbread() eq '') { if ($ENV{'request.state'} eq "construct") { - $request->print("In construction space, submissions ignored
"); } else { $request->print("Browsing or ambiguous reference, submissions ignored
"); }