version 1.200, 2018/01/15 00:51:42
|
version 1.202, 2018/09/03 16:43:47
|
Line 1800 sub render {
|
Line 1800 sub render {
|
if (lc($time) eq 'anytime') { |
if (lc($time) eq 'anytime') { |
$anytime=1; |
$anytime=1; |
$date = &get_date_object(time); |
$date = &get_date_object(time); |
$date->min(0); |
$date->set_minute(0); |
} elsif (defined($time) && $time ne 0) { |
} elsif (defined($time) && $time ne 0) { |
$date = &get_date_object($time); |
$date = &get_date_object($time); |
} else { |
} else { |
Line 1810 sub render {
|
Line 1810 sub render {
|
|
|
if (!defined($date)) { |
if (!defined($date)) { |
$date = &get_date_object(time); |
$date = &get_date_object(time); |
$date->min(0); |
$date->set_minute(0); |
} |
} |
|
|
if ($anytime) { |
if ($anytime) { |
Line 3327 sub start_group {
|
Line 3327 sub start_group {
|
if ((!$paramHash->{'grouponly'}) || (&Apache::lonnet::allowed('mdg',$Apache::lonnet::env{'request.course.id'}))) { |
if ((!$paramHash->{'grouponly'}) || (&Apache::lonnet::allowed('mdg',$Apache::lonnet::env{'request.course.id'}))) { |
%curr_groups = &Apache::longroup::coursegroups(); |
%curr_groups = &Apache::longroup::coursegroups(); |
} elsif ($Apache::lonnet::env{'request.course.groups'} ne '') { |
} elsif ($Apache::lonnet::env{'request.course.groups'} ne '') { |
map { $curr_groups{$_} = 1; } split(/,/,$Apache::lonnet::env{'request.course.groups'}); |
map { $curr_groups{$_} = 1; } split(/:/,$Apache::lonnet::env{'request.course.groups'}); |
} |
} |
foreach my $group_name (sort {lc($a) cmp lc($b)} (keys(%curr_groups))) { |
foreach my $group_name (sort {lc($a) cmp lc($b)} (keys(%curr_groups))) { |
push(@{$paramHash->{CHOICES}}, [$group_name, $group_name]); |
push(@{$paramHash->{CHOICES}}, [$group_name, $group_name]); |