--- loncom/interface/lonmenu.pm 2012/05/28 14:45:20 1.369.2.10
+++ loncom/interface/lonmenu.pm 2012/05/28 22:22:20 1.369.2.11
@@ -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.11 2012/05/28 22:22:20 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).
''.
' ▼'.
@@ -2021,7 +2025,7 @@ sub countdown_timer {
($Apache::inputtags::status[-1] eq 'CAN_ANSWER')) {
my $duedate = &Apache::lonnet::EXT("resource.0.duedate");
if ($duedate && $duedate > time) {
- my ($collapse,$expand,$title,$currdisp);
+ my ($collapse,$expand,$alttxt,$title,$currdisp);
my @interval=&Apache::lonnet::EXT("resource.0.interval");
if (@interval > 1) {
$currdisp = 'inline';
@@ -2031,7 +2035,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 <