--- loncom/interface/lonnavmaps.pm 2025/05/26 19:55:09 1.574 +++ loncom/interface/lonnavmaps.pm 2025/05/27 23:31:49 1.575 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.574 2025/05/26 19:55:09 raeburn Exp $ +# $Id: lonnavmaps.pm,v 1.575 2025/05/27 23:31:49 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1380,13 +1380,17 @@ sub cmp_title { sub render { my $args = shift; &Apache::loncommon::get_unprocessed_cgi($ENV{QUERY_STRING}); - my $result = ''; # Configure the renderer. my $cols = $args->{'cols'}; if (!defined($cols)) { # no columns, no nav maps. return ''; } + my $legend = ''; + my $tools = ''; + my $result = ''; + my $tools_printed = 0; + my $tablestarted = 0; my $navmap; if (defined($args->{'navmap'})) { $navmap = $args->{'navmap'}; @@ -1604,15 +1608,15 @@ sub render { # Print key? if ($printKey) { my $location = &Apache::loncommon::lonhttpdurl("/adm/lonMisc"); - $result .= '
'."\n". - ''.&mt('Key').':'. - '  '. - ' '.&mt('Unread Discussion'). - '  '. - ' '. - &mt('New message (click to open)'). - '
'. - '
'."\n"; + $legend = '
'."\n". + ''.&mt('Key').':'. + '  '. + ' '.&mt('Unread Discussion'). + '  '. + ' '. + &mt('New message (click to open)'). + '
'. + '
'."\n"; } if ($printCloseAll && !$args->{'resource_no_folder_link'}) { @@ -1632,9 +1636,9 @@ sub render { "location.href='$link'",$text); } } else { - $result.= ''.&mt($text).''; + $tools = ''.&mt($text).''; } - $result .= "\n"; + $tools .= "\n"; } # Check for any unread discussions in all resources. @@ -1646,7 +1650,7 @@ sub render { my $time=time; my $submit = &mt($markread); my $querystr = &HTML::Entities::encode($ENV{'QUERY_STRING'},'<>&"'); - $result .= (<