--- loncom/interface/lonmenu.pm 2012/05/28 14:45:20 1.369.2.10 +++ loncom/interface/lonmenu.pm 2012/08/01 12:30:39 1.369.2.14 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.369.2.10 2012/05/28 14:45:20 raeburn Exp $ +# $Id: lonmenu.pm,v 1.369.2.14 2012/08/01 12:30:39 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -432,8 +432,12 @@ sub secondary_menu { sub create_submenu { my ($link,$target,$title,$submenu) = @_; return unless (ref($submenu) eq 'ARRAY'); + my $disptarget; + if ($target ne '') { + $disptarget = ' target="'.$target.'"'; + } my $menu = '
  • '. - ''. + ''. ''.&mt($title). ''. ' ▼'. @@ -758,13 +762,17 @@ $menuitems.="&Notes&&annotate()&"; $menuitems.="Make notes and annotations about this resource&&1\n"; unless ($env{'request.noversionuri'}=~/\/(bulletinboard|smppg|navmaps|syllabus|aboutme|viewclasslist|portfolio)(\?|$)/) { - if ((!$env{'request.enc'}) && ($env{'request.noversionuri'} !~ m{^/adm/wrapper/ext/})) { + if ((!$env{'request.enc'}) && ($env{'request.noversionuri'} !~ m{^/adm/wrapper/ext/}) ($env{'request.noversionuri'} !~ m{^/uploaded/$match_domain/$match_courseid/docs/})) { $menuitems.=(< time) { - my ($collapse,$expand,$title,$currdisp); - my @interval=&Apache::lonnet::EXT("resource.0.interval"); - if (@interval > 1) { + my @interval=&Apache::lonnet::EXT("resource.0.interval"); + my $hastimeleft; + if (@interval > 1) { + my $first_access=&Apache::lonnet::get_first_access($interval[1]); + if ($first_access > 0) { + if ($first_access+$interval[0] > time) { + $hastimeleft = 1; + } + } + } + if (($duedate && $duedate > time) || + (!$duedate && $hastimeleft)) { + my ($collapse,$expand,$alttxt,$title,$currdisp); + if (@interval > 1 && $hastimeleft) { $currdisp = 'inline'; $collapse = '► '; } else { @@ -2031,7 +2049,8 @@ sub countdown_timer { $expand = '◄ '; } unless ($env{'environment.icons'} eq 'iconsonly') { - $title = &mt('Timer'); + $alttxt = &mt('Timer'); + $title = $alttxt.' '; } my $desc = &mt('Countdown to due date/time'); return < $collapse - + $expand -$title +$alttxt$title END } }