[BACK]Return to response.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/response.pm between versions 1.76 and 1.77

version 1.76, 2003/05/13 15:44:39 version 1.77, 2003/05/14 13:33:00
Line 363  sub setup_params { Line 363  sub setup_params {
 sub answer_header {  sub answer_header {
     my ($type) = @_;      my ($type) = @_;
     my $result;      my $result;
     if (($ENV{'form.print_answer'} eq 'yes') && ($ENV{'form.grade_target'} eq 'answer')) {      if ($ENV{'form.answer_output_mode'} eq 'tex') {
  $result = ' \vskip 0 mm \begin{tabular}{|c|}\hline Answer for Part: '.   $result = ' \vskip 0 mm \begin{tabular}{|c|}\hline Answer for Part: '.
                   $Apache::inputtags::part.' \\\\ \hline ';                    $Apache::inputtags::part.' \\\\ \hline ';
     } else {      } else {
Line 381  sub answer_header { Line 381  sub answer_header {
 sub answer_part {  sub answer_part {
     my ($type,$answer) = @_;      my ($type,$answer) = @_;
     my $result;      my $result;
     if (($ENV{'form.print_answer'} eq 'yes') && ($ENV{'form.grade_target'} eq 'answer')) {      if ($ENV{'form.answer_output_mode'} eq 'tex') {
  $result = ' '.$answer.'\\\\ \hline ';   $result = ' '.$answer.'\\\\ \hline ';
     } else {      } else {
  if ($type eq 'optionresponse' || $type eq 'radiobuttonresponse') {   if ($type eq 'optionresponse' || $type eq 'radiobuttonresponse') {
Line 396  sub answer_part { Line 396  sub answer_part {
 sub answer_footer {  sub answer_footer {
     my ($type) = @_;      my ($type) = @_;
     my $result;      my $result;
     if (($ENV{'form.print_answer'} eq 'yes') && ($ENV{'form.grade_target'} eq 'answer')) {      if ($ENV{'form.answer_output_mode'} eq 'tex') {
  $result = ' \end{tabular} \vskip 0 mm ';   $result = ' \end{tabular} \vskip 0 mm ';
     } else {      } else {
  if ($type eq 'optionresponse' || $type eq 'radiobuttonresponse') {   if ($type eq 'optionresponse' || $type eq 'radiobuttonresponse') {
Removed from v.1.76  
changed lines
  Added in v.1.77

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>