--- loncom/homework/matchresponse.pm 2008/12/11 00:56:20 1.73 +++ loncom/homework/matchresponse.pm 2008/12/11 01:20:32 1.73.2.1 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Full matching style response # -# $Id: matchresponse.pm,v 1.73 2008/12/11 00:56:20 raeburn Exp $ +# $Id: matchresponse.pm,v 1.73.2.1 2008/12/11 01:20:32 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -513,27 +513,18 @@ sub displayfoils { $optionlist="\n"; } else { if ($Apache::lonhomework::type ne 'exam') { - if($env{'form.pdfFormFields'} eq 'yes') { - my $fieldname = $env{'request.symb'} . '&part_'. $Apache::inputtags::part .'&matchresponse'. '&HWVAL_' . $Apache::inputtags::response['-1'] . ':' . $temp . '&submit_' . $Apache::inputtags::part . '&'; - $optionlist = &Apache::lonxml::print_pdf_start_combobox($fieldname); - } else { - $optionlist='\framebox[10 mm][s]{\tiny\strut}'; - } - } + $optionlist='\framebox[10 mm][s]{\tiny\strut}'; + } } my $option; foreach $option (@used_letters) { if ($option eq $last_letter) { if ($target ne 'tex') { $optionlist.="\n"; - } elsif ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes') { - $optionlist .= &Apache::lonxml::print_pdf_add_combobox_option($option); } } else { if ($target ne 'tex') { $optionlist.="\n"; - } elsif ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes') { - $optionlist .= &Apache::lonxml::print_pdf_add_combobox_option($option); } } } @@ -577,7 +568,7 @@ sub displayfoils { # Note that if left or right positioned, we must # confine the bubbles to righttabsize: # - if ($Apache::lonhomework::type eq 'exam' && $env{'form.pdfFormFields'} ne 'yes') { + if ($Apache::lonhomework::type eq 'exam') { $question.=' '.$optionlist.$text."\n"; my @emptyItems = (); for (my $i=0;$i<=$#used_letters;$i++) {push @emptyItems, ' ';} @@ -592,11 +583,7 @@ sub displayfoils { $question .= '\end{list} \vskip -8 mm \strut '; $internal_counter++; } else { - if($env{'form.pdfFormFields'} eq 'yes') { - $question .= " $optionlist ". &Apache::lonxml::print_pdf_end_combobox($text).'\strut'; - } else { - $question.=' '.$optionlist.$text.'\strut\\\\\strut '."\n"; - } + $question.=' '.$optionlist.$text.'\strut\\\\\strut '."\n"; } } $temp++;