--- loncom/interface/lonnavdisplay.pm 2010/03/29 14:50:46 1.17 +++ loncom/interface/lonnavdisplay.pm 2011/12/25 20:41:53 1.20 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavdisplay.pm,v 1.17 2010/03/29 14:50:46 raeburn Exp $ +# $Id: lonnavdisplay.pm,v 1.20 2011/12/25 20:41:53 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -37,6 +37,7 @@ use Apache::lonnavmaps(); use Apache::lonhtmlcommon(); use Apache::lonnet; use Apache::lonlocal; +use Apache::londocs(); use Time::HiRes qw( gettimeofday tv_interval ); sub handler { @@ -100,6 +101,7 @@ sub real_handler { } $r->print($start_page. '<script type="text/javascript">window.focus();</script>'); + &startContentScreen($r,'navmaps'); $r->rflush(); # Check that it's defined @@ -220,11 +222,11 @@ sub real_handler { } my %selected=($env{'form.sort'} => ' selected="selected"'); - my $sort_html=('<form name="sortForm"> + my $sort_html=('<form name="sortForm" action=""> <span class="LC_nobreak"> <input type="hidden" name="showOnlyHomework" value="'.$env{'form.showOnlyHomework'}.'" /> '.&mt('Sort by:').' - <select name="sort" onChange="document.sortForm.submit()"> + <select name="sort" onchange="document.sortForm.submit()"> <option value="default"'.$selected{'default'}.'>'.&mt('Default').'</option> <option value="title"'.$selected{'title'}.'>'.&mt('Title').'</option> <option value="duedate"'.$selected{'duedate'}.'>'.&mt('Duedate').'</option> @@ -259,13 +261,30 @@ sub real_handler { } #my $td=&tv_interval($t0); #$r->print("<br />$td"); - + &endContentScreen($r); $r->print(&Apache::loncommon::end_page()); $r->rflush(); return OK; } +sub startContentScreen { + my ($r,$mode)=@_; + + $r->print("\n".'<ul class="LC_TabContentBigger" id="mainnav">'."\n"); + $r->print('<li'.(($mode eq 'navmaps')?' class="active"':'').'><a href="/adm/navmaps"><b> '.&mt('Main Content').' </b></a></li>'."\n"); + $r->print('<li '.(($mode eq 'supplemental')?' class="active"':'').'><a href="/adm/supplemental"><b>'.&mt('Supplemental Content').'</b></a></li>'); + $r->print('<li'.(($mode eq 'coursesearch')?' class="active"':'').'><a href="/adm/searchcourse"><b> '.&mt('Content Search').' </b></a></li>'."\n"); + $r->print('<li'.(($mode eq 'courseindex')?' class="active"':'').'><a href="/adm/indexcourse"><b> '.&mt('Content Index').' </b></a></li>'."\n"); + $r->print("\n".'</ul>'."\n"); + $r->print('<div class="LC_Box" style="clear:both;margin:0;"><div id="maincoursedoc" style="margin:0 0;padding:0 0;"><div class="LC_ContentBox" id="mainCourseDocuments" style="display: block;">'); +} + +sub endContentScreen { + my ($r)=@_; + $r->print('</div></div></div>'); +} + 1; __END__