--- loncom/homework/structuretags.pm 2007/06/05 22:37:56 1.379 +++ loncom/homework/structuretags.pm 2007/06/22 20:42:20 1.382 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.379 2007/06/05 22:37:56 albertel Exp $ +# $Id: structuretags.pm,v 1.382 2007/06/22 20:42:20 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -880,14 +880,14 @@ sub end_problem { if ($Apache::lonhomework::type eq 'exam' and $allow_print_points==1) { $frontmatter .= '\fbox{\textit{'.$weight.' pt}}';} } } else { - $frontmatter .= '\vskip 1mm\textit{Due date: '.$duedate.'} \\\\\\\\'; + $frontmatter .= '\vskip 1mm\textit{Due date: '.$duedate.'} \\\\\\\\'.$startminipage; } } else { if (not $env{'request.symb'} =~ m/\.page_/) { $frontmatter .= $begin_doc.$toc_line; if (($Apache::lonhomework::type eq 'exam') and ($allow_print_points==1)) { $frontmatter .= '\fbox{\textit{'.$weight.' pt}}';} } else { - $frontmatter .= '\vskip 1mm \\\\\\\\'; + $frontmatter .= '\vskip 1mm \\\\\\\\'.$startminipage; } } $result =~ s/INSERTTEXFRONTMATTERHERE/$frontmatter/; @@ -937,7 +937,7 @@ sub end_problem { if (not $env{'request.symb'} =~ m/\.page_/) { $result .= $endminipage.'\end{document} '; } else { - $result .= ''; + $result .= $endminipage; } } } @@ -1225,6 +1225,13 @@ sub end_while { $return = 0; $error=1; next; } $result.=&Apache::scripttag::xmlparse($bodytext); + if ($target eq 'grade' || $target eq 'answer' || + $target eq 'analyze') { + # grade/answer/analyze should produce no output but if we + # are redirecting, the redirecter should know what to do + # with the output + if (!$Apache::lonxml::redirection) { undef($result); } + } $return = &Apache::run::run($code,$safeeval); } if ($error) {