loncom/interface/lonnavmaps.pm - diff

Return to lonnavmaps.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.389, 2006/06/29 16:32:14	version 1.390, 2006/07/25 00:57:51
Line 4046 sub duedate {	Line 4046 sub duedate {
my $date;	my $date;
my $interval=$self->parmval("interval", $part);	my $interval=$self->parmval("interval", $part);
my $due_date=$self->parmval("duedate", $part);	my $due_date=$self->parmval("duedate", $part);
if (defined($interval)) {	if ($interval =~ /\d+/) {
my $first_access=&Apache::lonnet::get_first_access('map',$self->symb);	my $first_access=&Apache::lonnet::get_first_access('map',$self->symb);
if (defined($first_access)) {	if (defined($first_access)) {
$interval = $first_access+$interval;	$interval = $first_access+$interval;