loncom/interface/lonnavmaps.pm - diff

Return to lonnavmaps.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.474, 2011/12/21 16:53:03	version 1.475, 2011/12/21 20:21:49
Line 1503 END	Line 1503 END
}	}
}	}
$result.='</form>';	$result.='</form>';
	if (&Apache::lonnet::allowed('mdc',$env{'request.course.id'})) {
	my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};
	my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};
	if ($env{'course.'.$env{'request.course.id'}.'.url'} eq
	"uploaded/$cdom/$cnum/default.sequence") {
	&add_linkitem($args->{'linkitems'},'edittoplevel',
	"javascript:gocmd('/adm/coursedocs','direct');",
	'Content Editor');
	}
	}
}	}

if ($args->{'caller'} eq 'navmapsdisplay') {	if ($args->{'caller'} eq 'navmapsdisplay') {
Line 1855 sub add_linkitem {	Line 1865 sub add_linkitem {
sub show_linkitems_toolbar {	sub show_linkitems_toolbar {
my ($linkitems,$condition)=@_;	my ($linkitems,$condition)=@_;
my @linkorder = ('firsthomework','everything','uncompleted',	my @linkorder = ('firsthomework','everything','uncompleted',
'changefolder','clearbubbles');	'changefolder','clearbubbles','edittoplevel');
my $result .='<td align="left">'."\n".	my $result .='<td align="left">'."\n".
'<span class="LC_nobreak">'."\n".	'<span class="LC_nobreak">'."\n".
'<ul id="LC_toolbar">';	'<ul id="LC_toolbar">';