version 1.197, 2015/08/28 22:44:59
|
version 1.198, 2016/03/05 21:49:44
|
Line 3826 sub render {
|
Line 3826 sub render {
|
if ($vars->{GRANULARITY} eq 'whole_course') { |
if ($vars->{GRANULARITY} eq 'whole_course') { |
$resourceString .= '<li>'.&mt('for [_1]all resources in the course[_2]','<b>','</b>').'</li>'; |
$resourceString .= '<li>'.&mt('for [_1]all resources in the course[_2]','<b>','</b>').'</li>'; |
if ($vars->{TARGETS} eq 'course') { |
if ($vars->{TARGETS} eq 'course') { |
$level = 14; # general course, see lonparmset.pm perldoc |
$level = 18; # general course, see lonparmset.pm perldoc |
} elsif ($vars->{TARGETS} eq 'section') { |
} elsif ($vars->{TARGETS} eq 'section') { |
$level = 9; |
$level = 12; |
} elsif ($vars->{TARGETS} eq 'group') { |
} elsif ($vars->{TARGETS} eq 'group') { |
$level = 6; |
$level = 8; |
} else { |
} else { |
$level = 3; |
$level = 4; |
} |
} |
$affectedResourceId = "0.0"; |
$affectedResourceId = "0.0"; |
$symb = 'a'; |
$symb = 'a'; |
$paramlevel = 'general'; |
$paramlevel = 'general'; |
} elsif ($vars->{GRANULARITY} eq 'map') { |
} elsif (($vars->{GRANULARITY} eq 'map') || ($vars->{GRANULARITY} eq 'maprecurse')) { |
my $navmap = Apache::lonnavmaps::navmap->new(); |
my $navmap = Apache::lonnavmaps::navmap->new(); |
if (defined($navmap)) { |
if (defined($navmap)) { |
my $res = $navmap->getByMapPc($vars->{RESOURCE_ID}); |
my $res = $navmap->getByMapPc($vars->{RESOURCE_ID}); |
my $title = $res->compTitle(); |
my $title = $res->compTitle(); |
$symb = $res->symb(); |
$symb = $res->symb(); |
$resourceString .= '<li>'.&mt('for the map named [_1]',"<b>$title</b>").'</li>'; |
if ($vars->{GRANULARITY} eq 'map') { |
|
$resourceString .= '<li>'.&mt('for the map named [_1]',"<b>$title</b>").'</li>'; |
|
} else { |
|
$resourceString .= '<li>'.&mt('for the map named [_1] (applies recursively to sub-folders)',"<b>$title</b>").'</li>'; |
|
} |
} else { |
} else { |
$resourceString .= '<li>'.&mt('for the map ID [_1] (name unavailable)','<b>'.$vars->{RESOURCE_ID}.'</b>').'</li>'; |
$resourceString .= '<li>'.&mt('for the map ID [_1] (name unavailable)','<b>'.$vars->{RESOURCE_ID}.'</b>').'</li>'; |
&Apache::lonnet::logthis('Retrieval of map title failed in lonhelper.pm - could not create navmap object for course.'); |
&Apache::lonnet::logthis('Retrieval of map title failed in lonhelper.pm - could not create navmap object for course.'); |
|
|
} |
} |
if ($vars->{TARGETS} eq 'course') { |
if ($vars->{GRANULARITY} eq 'maprecurse') { |
$level = 13; # general course, see lonparmset.pm perldoc |
if ($vars->{TARGETS} eq 'course') { |
} elsif ($vars->{TARGETS} eq 'section') { |
$level = 17; # general course, see lonparmset.pm perldoc |
$level = 8; |
} elsif ($vars->{TARGETS} eq 'section') { |
} elsif ($vars->{TARGETS} eq 'group') { |
$level = 11; |
$level = 5; |
} elsif ($vars->{TARGETS} eq 'group') { |
} else { |
$level = 7; |
$level = 2; |
} else { |
} |
$level = 3; |
|
} |
|
} else { |
|
if ($vars->{TARGETS} eq 'course') { |
|
$level = 16; # general course, see lonparmset.pm perldoc |
|
} elsif ($vars->{TARGETS} eq 'section') { |
|
$level = 10; |
|
} elsif ($vars->{TARGETS} eq 'group') { |
|
$level = 6; |
|
} else { |
|
$level = 2; |
|
} |
|
} |
$affectedResourceId = $vars->{RESOURCE_ID}; |
$affectedResourceId = $vars->{RESOURCE_ID}; |
$paramlevel = 'map'; |
$paramlevel = 'map'; |
} else { |
} else { |
Line 3874 sub render {
|
Line 3890 sub render {
|
&Apache::lonnet::logthis('Retrieval of resource title failed in lonhelper.pm - could not create navmap object for course.'); |
&Apache::lonnet::logthis('Retrieval of resource title failed in lonhelper.pm - could not create navmap object for course.'); |
} |
} |
if ($vars->{TARGETS} eq 'course') { |
if ($vars->{TARGETS} eq 'course') { |
$level = 10; # general course, see lonparmset.pm perldoc |
$level = 13; # general course, see lonparmset.pm perldoc |
} elsif ($vars->{TARGETS} eq 'section') { |
} elsif ($vars->{TARGETS} eq 'section') { |
$level = 7; |
$level = 9; |
} elsif ($vars->{TARGETS} eq 'group') { |
} elsif ($vars->{TARGETS} eq 'group') { |
$level = 4; |
$level = 5; |
} else { |
} else { |
$level = 1; |
$level = 1; |
} |
} |
Line 3894 sub render {
|
Line 3910 sub render {
|
if ($vars->{GRANULARITY} eq 'resource') { |
if ($vars->{GRANULARITY} eq 'resource') { |
$result .= "<input type='hidden' name='symb' value='". |
$result .= "<input type='hidden' name='symb' value='". |
HTML::Entities::encode($symb,"'<>&\"") . "' />\n"; |
HTML::Entities::encode($symb,"'<>&\"") . "' />\n"; |
} elsif ($vars->{GRANULARITY} eq 'map') { |
} elsif (($vars->{GRANULARITY} eq 'map') || ($vars->{GRANULARITY} eq 'maprecurse')) { |
$result .= "<input type='hidden' name='pschp' value='". |
$result .= "<input type='hidden' name='pschp' value='". |
$affectedResourceId."' />\n"; |
$affectedResourceId."' />\n"; |
} |
} |