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.108, 2004/10/21 06:33:37
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'});
}	}
}	}

Line 507 sub showallfoils {	Line 508 sub showallfoils {
return 1;	return 1;
}	}
}	}
	if ($Apache::lonhomework::type eq 'survey') { return 1; }
return 0;	return 0;
}	}