loncom/homework/response.pm - diff

Return to response.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.106, 2004/10/15 16:22:25	version 1.107, 2004/10/21 03:19:04
Line 268 sub handle_previous {	Line 268 sub handle_previous {
if ($$previous{'used'} && ($$previous{'award'} eq $ad) ) {	if ($$previous{'used'} && ($$previous{'award'} eq $ad) ) {
if ($$previous{'last'}) {	if ($$previous{'last'}) {
push(@Apache::inputtags::previous,'PREVIOUSLY_LAST');	push(@Apache::inputtags::previous,'PREVIOUSLY_LAST');
} else {	push(@Apache::inputtags::previous_version,$$previous{'version'});
	} elsif ($Apache::lonhomework::type ne 'survey') {
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'});
}	}
}	}