--- loncom/homework/radiobuttonresponse.pm 2008/08/08 16:37:13 1.134 +++ loncom/homework/radiobuttonresponse.pm 2008/09/05 12:50:45 1.135 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # mutliple choice style responses # -# $Id: radiobuttonresponse.pm,v 1.134 2008/08/08 16:37:13 bisitz Exp $ +# $Id: radiobuttonresponse.pm,v 1.135 2008/09/05 12:50:45 onken Exp $ # # Copyright Michigan State University Board of Trustees # @@ -100,7 +100,12 @@ sub start_radiobuttonresponse { } else { $result .= ' \renewcommand{\labelenumi}{\Alph{enumi}.}'; } - $result .= '\begin{enumerate}'; + if($env{'form.pdfFormFields'} eq 'yes') { + $result .= &Apache::lonxml::print_pdf_hiddenfield('meta', $env{'user.name'}, $env{'user.domain'}); + $result .= "\n\\\\\n\\\\\n"; + } else { + $result .= '\begin{enumerate}'; + } } elsif ($target eq 'analyze') { my $part_id="$Apache::inputtags::part.$id"; $Apache::lonhomework::analyze{"$part_id.type"} = 'radiobuttonresponse'; @@ -113,7 +118,9 @@ sub end_radiobuttonresponse { my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; my $result; if ($target eq 'edit') { $result=&Apache::edit::end_table(); } - if ($target eq 'tex') { $result .= '\end{enumerate}'; } + if ($target eq 'tex' and $env{'form.pdfFormFields'} ne 'yes') { + $result .= '\end{enumerate}'; + } &Apache::response::end_response; pop @Apache::lonxml::namespace; &Apache::lonxml::deregister('Apache::radiobuttonresponse',('foilgroup','foil','conceptgroup')); @@ -347,13 +354,27 @@ sub displayallfoils { $result.="