--- loncom/interface/lonnavdisplay.pm 2010/10/04 21:51:22 1.13.6.3 +++ loncom/interface/lonnavdisplay.pm 2010/03/29 14:50:46 1.17 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavdisplay.pm,v 1.13.6.3 2010/10/04 21:51:22 raeburn Exp $ +# $Id: lonnavdisplay.pm,v 1.17 2010/03/29 14:50:46 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -67,65 +67,6 @@ sub real_handler { &Apache::loncommon::no_cache($r); my %toplinkitems=(); - &Apache::lonnavmaps::add_linkitem(\%toplinkitems,'blank','', - "Select Action"); - if ($ENV{QUERY_STRING} eq 'collapseExternal') { - &Apache::lonnet::put('environment',{'remotenavmap' => 'off'}); - &Apache::lonnet::appenv({'environment.remotenavmap' => 'off'}); - my $menu=&Apache::lonmenu::reopenmenu(); - my $navstatus=&Apache::lonmenu::get_nav_status(); - if ($menu) { - $menu=(<send_http_header; - my $js =<<"ENDSUBM"; - -ENDSUBM - $r->print(&Apache::loncommon::start_page(undef,$js, - {'only_body' => 1, - 'bgcolor' => '#FFFFFF', - 'add_entries' => - {'onload' => - "submitthis()"}}). - &Apache::loncommon::end_page()); - - return OK; - } - if ($ENV{QUERY_STRING} =~ /^launchExternal/) { - &Apache::lonnet::put('environment',{'remotenavmap' => 'on'}); - &Apache::lonnet::appenv({'environment.remotenavmap' => 'on'}); - my $menu=&Apache::lonmenu::reopenmenu(); - my $navstatus=&Apache::lonmenu::get_nav_status(); - if ($menu) { - $r->print(< - swmenu=$menu - swmenu.clearTimeout(swmenu.menucltim); - $navstatus - -MENU - } - } - if ($ENV{QUERY_STRING} eq 'turningOffExternal') { - $env{'environment.remotenavmap'}='off'; - } # Create the nav map my $navmap = Apache::lonnavmaps::navmap->new(); @@ -142,49 +83,23 @@ MENU &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['sort','showOnlyHomework','postsymb','register']); # ----------------------------------------------------- Force menu registration - my $body_only=''; - my $js; - if ($env{'environment.remotenavmap'} eq 'on') { - $js=''; - $body_only=1; - } - # Header my $course_type = &Apache::loncommon::course_type(); - my ($title,$breadcrumb_text,$start_page,$args); - $title = 'Contents'; - $breadcrumb_text = &mt('Contents'); + my $title = $course_type . ' Contents'; + my ($start_page,$args); if ($env{'form.register'}) { $args = {'force_register' => $env{'form.register'}}; - my $brcrum = [{href => '/adm/navmaps', - text => $breadcrumb_text, - no_mt => 1,}, - ]; - $args = {'bread_crumbs' => $brcrum, - 'only_body' => $body_only}; - $start_page = &Apache::loncommon::start_page($title,$js,$args); + $start_page = &Apache::loncommon::start_page($title,undef,$args); } else { - my $nomenu = 0; - if ((&Apache::loncommon::needs_gci_custom()) || - ($env{'user.domain'} eq 'gcitest' && $env{'request.course.id'})) { - $nomenu = 1; - } - my $brcrum = [{href => '/adm/navmaps', - text => $breadcrumb_text, - no_mt => 1, - _nomenu => $nomenu,}, + my $brcrum = [{href => '/adm/navmaps', + text => &mt($course_type . ' Contents'), + no_mt => 1}, ]; - $args = {'bread_crumbs' => $brcrum, - 'only_body' => $body_only}; - $start_page = &Apache::loncommon::start_page($title,$js,$args); + $args = {'bread_crumbs' => $brcrum}; + $start_page = &Apache::loncommon::start_page($title,undef,$args); } $r->print($start_page. ''); - $r->rflush(); # Check that it's defined @@ -220,27 +135,6 @@ MENU } } - if ($ENV{QUERY_STRING} eq 'launchExternal') { - $r->print(' -
-
'); - $r->print(' - '); - } - - if ($env{'environment.remotenavmap'} ne 'on') { - $r->print(&launch_win('link','yes',\%toplinkitems)); - } - if ($env{'environment.remotenavmap'} eq 'on') { - &Apache::lonnavmaps::add_linkitem(\%toplinkitems,'closenav', - 'collapse()', - "Close navigation window"); - } - - # Check to see if the student is jumping to next open, do-able problem if ($ENV{QUERY_STRING} =~ /^jumpToFirstHomework/) { # Find the next homework problem that they can do. @@ -285,7 +179,7 @@ MENU } else { my $link = 'navmaps?jumpToFirstHomework'; if ($env{'form.register'}) { - $link .= '&register='.$env{'form.register'}; + $link .= '&register='.$env{'form.register'}; } &Apache::lonnavmaps::add_linkitem(\%toplinkitems,'firsthomework', 'location.href="'.$link.'"', @@ -310,7 +204,7 @@ MENU } &Apache::lonnavmaps::add_linkitem(\%toplinkitems,'everything', 'location.href="'.$link.'"', - "Show everything"); + 'Show everything'); $r->print("".&mt("Uncompleted Problems").""); $env{'form.filter'} = ''; $env{'form.condition'} = 1; @@ -322,15 +216,15 @@ MENU } &Apache::lonnavmaps::add_linkitem(\%toplinkitems,'uncompleted', 'location.href="'.$link.'"', - "Show only uncompleted problems"); + 'Show only uncompleted problems'); } my %selected=($env{'form.sort'} => ' selected="selected"'); - my $sort_html=('
+ my $sort_html=(' '.&mt('Sort by:').' - @@ -372,35 +266,6 @@ MENU return OK; } -sub launch_win { - my ($mode,$script,$toplinkitems,$firsttime)=@_; - my $result; - if ($script ne 'no') { - $result.=''; - } - if ($mode eq 'link') { - &Apache::lonnavmaps::add_linkitem($toplinkitems,'launchnav', - 'launch_navmapwin()', - "Launch navigation window"); - } - return $result; -} - 1; __END__