--- loncom/interface/lonprintout.pm 2008/03/24 18:22:36 1.523 +++ loncom/interface/lonprintout.pm 2008/03/28 14:52:52 1.524 @@ -1,7 +1,7 @@ # The LearningOnline Network # Printout # -# $Id: lonprintout.pm,v 1.523 2008/03/24 18:22:36 raeburn Exp $ +# $Id: lonprintout.pm,v 1.524 2008/03/28 14:52:52 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -158,6 +158,22 @@ sub ssi_with_retries { } +sub get_student_view_with_retries { + my ($curresline,$retries,$username,$userdomain,$courseid,$target,$moreenv)=@_; + + my ($content, $response) = &Apache::loncommon::get_student_view_with_retries($curresline,$retries,$username,$userdomain,$courseid,$target,$moreenv); + if (!$response->is_success) { + $ssi_error = 1; + $ssi_last_error_resource = $curresline; + $ssi_last_error = $response->code . " " . $response->message; + + &Apache::lonnet::logthis("Error in SSI (student view) resource: $curresline Error: $ssi_last_error"); + } + + return $content; + +} + # # printf_style_subst item format_string repl # @@ -2271,7 +2287,7 @@ sub print_resources { &Apache::lonxml::remember_problem_counter(); - my $rendered = &Apache::loncommon::get_student_view($curresline,$username,$userdomain,$env{'request.course.id'},'tex',$moreenv); + my $rendered = &Apache::loncommon::get_student_view_with_retries($curresline,3,$username,$userdomain,$env{'request.course.id'},'tex',$moreenv); if(($helper->{'VARS'}->{'ANSWER_TYPE'} eq 'no') || ($helper->{'VARS'}->{'ANSWER_TYPE'} eq 'only')) {