--- loncom/homework/response.pm 2005/12/06 10:00:08 1.133 +++ loncom/homework/response.pm 2006/01/21 08:17:51 1.135 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # various response type definitons response definition # -# $Id: response.pm,v 1.133 2005/12/06 10:00:08 albertel Exp $ +# $Id: response.pm,v 1.135 2006/01/21 08:17:51 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -646,7 +646,7 @@ sub answer_footer { my $result; if ($env{'form.answer_output_mode'} eq 'tex') { my $columns = scalar(@answer_bits); - $result = ' \vskip 0 mm \begin{tabular}{|'.'c|'x$columns.'}\hline '; + $result = ' \vskip 0 mm \noindent \begin{tabular}{|'.'c|'x$columns.'}\hline '; $result .= join(' & ',@answer_bits); $result .= ' \\\\ \\hline \end{tabular} \vskip 0 mm '; } else { @@ -884,7 +884,8 @@ sub add_to_gradingqueue { my ($symb,$courseid,$domain,$name) = &Apache::lonxml::whichuser(); if ( $courseid eq '' || $symb eq '' - || $env{'request.state'} eq 'construct') { + || $env{'request.state'} eq 'construct' + || $Apache::lonhomework::type ne 'problem') { return; }