loncom/homework/response.pm - diff

Return to response.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.216, 2009/05/24 13:08:18	version 1.217, 2010/02/28 23:44:36
Line 318 sub handle_previous {	Line 318 sub handle_previous {
if ($$previous{'last'}) {	if ($$previous{'last'}) {
push(@Apache::inputtags::previous,'PREVIOUSLY_LAST');	push(@Apache::inputtags::previous,'PREVIOUSLY_LAST');
push(@Apache::inputtags::previous_version,$$previous{'version'});	push(@Apache::inputtags::previous_version,$$previous{'version'});
} elsif ($Apache::lonhomework::type ne 'survey') {	} elsif (($Apache::lonhomework::type ne 'survey') &&
	($Apache::lonhomework::type ne 'surveycred') &&
	($Apache::lonhomework::type ne 'anonsurvey') &&
	($Apache::lonhomework::type ne 'anonsurveycred')) {
push(@Apache::inputtags::previous,'PREVIOUSLY_USED');	push(@Apache::inputtags::previous,'PREVIOUSLY_USED');
push(@Apache::inputtags::previous_version,$$previous{'version'});	push(@Apache::inputtags::previous_version,$$previous{'version'});
}	}
Line 907 sub showallfoils {	Line 910 sub showallfoils {
}	}
}	}
if ($Apache::lonhomework::type eq 'survey') { return 1; }	if ($Apache::lonhomework::type eq 'survey') { return 1; }
	if ($Apache::lonhomework::type eq 'surveycred') { return 1; }
	if ($Apache::lonhomework::type eq 'anonsurvey') { return 1; }
	if ($Apache::lonhomework::type eq 'anonsurveycred') { return 1; }

return 0;	return 0;
}	}