--- loncom/interface/lonmenu.pm 2012/05/29 16:25:53 1.380 +++ loncom/interface/lonmenu.pm 2012/05/29 19:40:44 1.381 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.380 2012/05/29 16:25:53 raeburn Exp $ +# $Id: lonmenu.pm,v 1.381 2012/05/29 19:40:44 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1815,10 +1815,19 @@ sub countdown_timer { ($Apache::inputtags::status[-1] eq 'CAN_ANSWER')) { my $duedate = &Apache::lonnet::EXT("resource.0.duedate"); 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 && @interval > 1)) { + (!$duedate && $hastimeleft)) { my ($collapse,$expand,$alttxt,$title,$currdisp); - if (@interval > 1) { + if (@interval > 1 && $hastimeleft) { $currdisp = 'inline'; $collapse = '► '; } else {