--- loncom/interface/lonnavmaps.pm 2011/12/21 16:53:03 1.474 +++ loncom/interface/lonnavmaps.pm 2011/12/21 20:21:49 1.475 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.474 2011/12/21 16:53:03 raeburn Exp $ +# $Id: lonnavmaps.pm,v 1.475 2011/12/21 20:21:49 raeburn Exp $ # # Copyright Michigan State University Board of Trustees @@ -1503,6 +1503,16 @@ END } } $result.=''; + 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') { @@ -1855,7 +1865,7 @@ sub add_linkitem { sub show_linkitems_toolbar { my ($linkitems,$condition)=@_; my @linkorder = ('firsthomework','everything','uncompleted', - 'changefolder','clearbubbles'); + 'changefolder','clearbubbles','edittoplevel'); my $result .=''."\n". ''."\n". '