version 1.925.2.2, 2009/12/07 20:04:18
|
version 1.925.2.3, 2009/12/08 05:00:15
|
Line 10777 sub existing_gcitest_courses {
|
Line 10777 sub existing_gcitest_courses {
|
} |
} |
my ($tstart,$tend) = split(':',$env{$envkey}); |
my ($tstart,$tend) = split(':',$env{$envkey}); |
if (((!$tstart) || ($tstart < $now)) && ((!$tend) || ($tend > $now))) { |
if (((!$tstart) || ($tstart < $now)) && ((!$tend) || ($tend > $now))) { |
my %coursehash = &Apache::lonnet::coursedescription($cdom.'/'.$cnum); |
my $descr = $env{'course.'.$cdom.'_'.$cnum.'.description'}; |
$courses{$cdom.'_'.$cnum}{'description'} = $coursehash{'description'}; |
if ($descr ne '') { |
$courses{$cdom.'_'.$cnum}{'owner'} = $coursehash{'internal.courseowner'}; |
$courses{$cdom.'_'.$cnum}{'description'} = $descr; |
if (defined($coursehash{'default_enrollment_start_date'}) ) { |
|
$courses{$cdom.'_'.$cnum}{'startaccess'} = |
|
&Apache::lonlocal::locallocaltime($coursehash{'default_enrollment_start_date'}); |
|
} |
|
if (defined($coursehash{'default_enrollment_end_date'}) ) { |
|
$courses{$cdom.'_'.$cnum}{'endaccess'} = |
|
&Apache::lonlocal::locallocaltime($coursehash{'default_enrollment_end_date'}); |
|
if ($coursehash{'default_enrollment_end_date'} == 0) { |
|
$courses{$cdom.'_'.$cnum}{'endaccess'} = &mt('No ending date'); |
|
} |
|
} |
} |
} |
} |
} |
} |