version 1.144, 2010/02/28 23:42:24
|
version 1.145, 2010/05/03 14:43:50
|
Line 105 sub start_radiobuttonresponse {
|
Line 105 sub start_radiobuttonresponse {
|
$result .= ' \renewcommand{\labelenumi}{\Alph{enumi}.}'; |
$result .= ' \renewcommand{\labelenumi}{\Alph{enumi}.}'; |
} |
} |
if($env{'form.pdfFormFields'} eq 'yes' && $Apache::inputtags::status[-1] eq 'CAN_ANSWER') { |
if($env{'form.pdfFormFields'} eq 'yes' && $Apache::inputtags::status[-1] eq 'CAN_ANSWER') { |
$result .= &Apache::lonxml::print_pdf_hiddenfield('meta', $env{'user.name'}, $env{'user.domain'}); |
$result .= '\begin{itemize}'; |
$result .= "\n\\\\\n\\\\\n"; |
|
} else { |
} else { |
$result .= '\begin{enumerate}'; |
$result .= '\begin{enumerate}'; |
} |
} |
Line 122 sub end_radiobuttonresponse {
|
Line 121 sub end_radiobuttonresponse {
|
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my $result; |
my $result; |
if ($target eq 'edit') { $result=&Apache::edit::end_table(); } |
if ($target eq 'edit') { $result=&Apache::edit::end_table(); } |
if ($target eq 'tex' and ($env{'form.pdfFormFields'} ne 'yes' or $Apache::inputtags::status[-1] ne 'CAN_ANSWER')) { |
if ($target eq 'tex' ) { |
$result .= '\end{enumerate}'; |
if($env{'form.pdfFormFields'} eq 'yes' and $Apache::inputtags::status[-1] eq 'CAN_ANSWER') { |
|
$result .= '\end{itemize}'; |
|
} else { |
|
$result .= '\end{enumerate}'; |
|
} |
} |
} |
&Apache::response::end_response; |
&Apache::response::end_response; |
pop @Apache::lonxml::namespace; |
pop @Apache::lonxml::namespace; |
Line 374 sub displayallfoils {
|
Line 377 sub displayallfoils {
|
} else { |
} else { |
if ($target eq 'tex') { |
if ($target eq 'tex') { |
if($env{'form.pdfFormFields'} eq 'yes' && $Apache::inputtags::status[-1] eq 'CAN_ANSWER') { |
if($env{'form.pdfFormFields'} eq 'yes' && $Apache::inputtags::status[-1] eq 'CAN_ANSWER') { |
my $fieldname = $env{'request.symb'}. |
my $fieldname = $env{'request.symb'}.'&part_'. $Apache::inputtags::part |
'&part_'. $Apache::inputtags::part. |
.'&radiobuttonresponse'.'&HWVAL_'.$Apache::inputtags::response['-1']; |
'&radiobuttonresponse'. |
$result .= '\item[{'.&Apache::lonxml::print_pdf_radiobutton($fieldname,$temp).'}]' |
'&HWVAL_' . $Apache::inputtags::response['-1']; |
.$Apache::response::foilgroup{$name.'.text'}."\n"; |
my $value = $temp; |
|
my $text = $Apache::response::foilgroup{$name.'.text'}; |
|
$result .= &Apache::lonxml::print_pdf_radiobutton($fieldname, |
|
$value, |
|
$text)."\n"; |
|
} else { |
} else { |
$result .= '\item \vskip -2mm '; |
$result .= '\item \vskip -2mm '; |
} |
} |
Line 653 sub displayfoils {
|
Line 651 sub displayfoils {
|
$i++; |
$i++; |
$bubble_number++; |
$bubble_number++; |
} else { |
} else { |
if($env{'form.pdfFormFields'} eq 'yes' && $Apache::inputtags::status[-1] eq 'CAN_ANSWER') { |
if($env{'form.pdfFormFields'} eq 'yes' && $Apache::inputtags::status[-1] eq 'CAN_ANSWER') { |
|
my $fieldname = $env{'request.symb'}.'&part_'. $Apache::inputtags::part |
my $fieldname = $env{'request.symb'}. |
.'&radiobuttonresponse'.'&HWVAL_'.$Apache::inputtags::response['-1']; |
'&part_'. $Apache::inputtags::part. |
$result .= '\item[{'.&Apache::lonxml::print_pdf_radiobutton($fieldname,$temp).'}]' |
'&radiobuttonresponse'. |
.$Apache::response::foilgroup{$name.'.text'}."\n"; |
'&HWVAL_' . $Apache::inputtags::response['-1']; |
} else { |
my $value = $temp; |
$result .= '\vspace*{-2 mm}\item '.$Apache::response::foilgroup{$name.'.text'}; |
my $text = $Apache::response::foilgroup{$name.'.text'}; |
} |
$result .= &Apache::lonxml::print_pdf_radiobutton($fieldname, $value, $text).'\newline'."\n"; |
|
} else { |
|
$result .= '\vspace*{-2 mm}\item '.$Apache::response::foilgroup{$name.'.text'}; |
|
} |
|
} |
} |
} |
} |
if ($target ne 'tex' && $direction eq 'horizontal') { |
if ($target ne 'tex' && $direction eq 'horizontal') { |