version 1.201, 2018/08/29 20:21:30
|
version 1.204, 2022/06/27 20:35:51
|
Line 2162 sub start_resource {
|
Line 2162 sub start_resource {
|
$paramHash->{'addstatus'} = $token->[2]{'addstatus'}; |
$paramHash->{'addstatus'} = $token->[2]{'addstatus'}; |
$paramHash->{'addparts'} = $token->[2]{'addparts'}; |
$paramHash->{'addparts'} = $token->[2]{'addparts'}; |
$paramHash->{'modalLink'} = $token->[2]{'modallink'}; |
$paramHash->{'modalLink'} = $token->[2]{'modallink'}; |
|
$paramHash->{'nocurrloc'} = $token->[2]{'nocurrloc'}; |
|
$paramHash->{'suppressNavmap'} = $token->[2]{'suppressNavmap'}; |
if ($paramHash->{'addparts'}) { |
if ($paramHash->{'addparts'}) { |
$helper->declareVar($paramHash->{'variable'}.'_part'); |
$helper->declareVar($paramHash->{'variable'}.'_part'); |
} |
} |
Line 2544 RADIO
|
Line 2546 RADIO
|
push @$cols, (Apache::lonnavmaps::part_status_summary()); |
push @$cols, (Apache::lonnavmaps::part_status_summary()); |
|
|
} |
} |
|
my $caller; |
|
if ($helper->{TITLE} eq 'Printing Helper') { |
|
$caller = 'printout'; |
|
} |
$result .= |
$result .= |
&Apache::lonnavmaps::render( { 'cols' => $cols, |
&Apache::lonnavmaps::render( { 'cols' => $cols, |
'showParts' => 0, |
'showParts' => 0, |
Line 2554 RADIO
|
Line 2560 RADIO
|
'include_top_level_map' => $self->{'include_top_level_map'}, |
'include_top_level_map' => $self->{'include_top_level_map'}, |
'iterator_map' => $mapUrl, |
'iterator_map' => $mapUrl, |
'map_no_edit_link' => 1, |
'map_no_edit_link' => 1, |
'modalLink' => $modalLink, } |
'modalLink' => $modalLink, |
|
'nocurrloc' => $self->{'nocurrloc'}, |
|
'suppressNavmap' => $self->{'suppressNavmap'}, |
|
'caller' => $caller, } |
); |
); |
|
|
$result .= $buttons; |
$result .= $buttons; |
Line 3327 sub start_group {
|
Line 3336 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]); |