loncom/homework/radiobuttonresponse.pm - diff

Return to radiobuttonresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.28, 2001/11/09 20:20:45	version 1.29, 2001/11/12 20:36:41
Line 67 sub storesurvey {	Line 67 sub storesurvey {

sub end_foilgroup {	sub end_foilgroup {
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;	my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;

my $result;	my $result;
if ($target eq 'grade' \|\| $target eq 'web' \|\| $target eq 'answer') {	if ($target eq 'grade' \|\| $target eq 'web' \|\| $target eq 'answer') {
my $style = &Apache::lonxml::get_param('style',$parstack,$safeeval,'-2');	my $style = $Apache::lonhomework::type;
if ( $style eq 'survey' ) {	if ( $style eq 'survey' ) {
if ($target eq 'web') {	if ($target eq 'web') {
$result=&displayallfoils();	$result=&displayallfoils();