loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.249, 2006/06/08 22:33:57	version 1.250, 2006/06/12 18:45:35
Line 486 sub check_access {	Line 486 sub check_access {
}	}
# this should work exactly like the copy in lonnavmaps.pm	# this should work exactly like the copy in lonnavmaps.pm
sub due_date {	sub due_date {
my ($part_id,$symb)=@_;	my ($part_id,$symb,$udom,$uname)=@_;
my $date;	my $date;
my $interval= &Apache::lonnet::EXT("resource.$part_id.interval",$symb);	my $interval= &Apache::lonnet::EXT("resource.$part_id.interval",$symb,
	$udom,$uname);
&Apache::lonxml::debug("looking for interval $part_id $symb $interval");	&Apache::lonxml::debug("looking for interval $part_id $symb $interval");
my $due_date= &Apache::lonnet::EXT("resource.$part_id.duedate",$symb);	my $due_date= &Apache::lonnet::EXT("resource.$part_id.duedate",$symb,
	$udom,$uname);
&Apache::lonxml::debug("looking for due_date $part_id $symb $due_date");	&Apache::lonxml::debug("looking for due_date $part_id $symb $due_date");
if (defined($interval)) {	if (defined($interval)) {
my $first_access=&Apache::lonnet::get_first_access('map',$symb);	my $first_access=&Apache::lonnet::get_first_access('map',$symb);