--- loncom/homework/optionresponse.pm 2003/03/26 18:42:29 1.69 +++ loncom/homework/optionresponse.pm 2003/03/27 14:58:56 1.71 @@ -1,7 +1,7 @@ # LearningOnline Network with CAPA # option list style responses # -# $Id: optionresponse.pm,v 1.69 2003/03/26 18:42:29 sakharuk Exp $ +# $Id: optionresponse.pm,v 1.71 2003/03/27 14:58:56 sakharuk Exp $ # # Copyright Michigan State University Board of Trustees # @@ -31,8 +31,6 @@ package Apache::optionresponse; use strict; use Apache::response; -my $flag_for_exam_printing = 1; - BEGIN { &Apache::lonxml::register('Apache::optionresponse',('optionresponse')); } @@ -633,10 +631,10 @@ sub end_foil { && !&Apache::response::showallfoils() ) { push @{ $Apache::response::conceptgroup{'names'} }, $name; $Apache::response::conceptgroup{"$name.value"} = $value; - if ($target eq 'tex' and $Apache::lonhomework::type eq 'exam' and $flag_for_exam_printing) { + if ($target eq 'tex' and $Apache::lonhomework::type eq 'exam') { $Apache::response::conceptgroup{"$name.text"} = '\vskip 4 mm $\triangleright$ '.$text; } else { - if ($target eq 'tex') { + if ($target eq 'tex' and $Apache::lonhomework::type eq 'exam') { $Apache::response::conceptgroup{"$name.text"} = ' $\triangleright$ '.$text; } else { $Apache::response::conceptgroup{"$name.text"} = $text; @@ -646,10 +644,10 @@ sub end_foil { } else { push @{ $Apache::response::foilgroup{'names'} }, $name; $Apache::response::foilgroup{"$name.value"} = $value; - if ($Apache::lonhomework::type eq 'exam' and $flag_for_exam_printing) { + if ($Apache::lonhomework::type eq 'exam') { $Apache::response::foilgroup{"$name.text"} = '\vskip 5 mm $\triangleright$ '.$text; } else { - if ($target eq 'tex') { + if ($target eq 'tex' and $Apache::lonhomework::type eq 'exam') { $Apache::response::foilgroup{"$name.text"} = ' $\triangleright$ '.$text; } else { $Apache::response::foilgroup{"$name.text"} = $text;