';
}
- $result.=&show_linkitems($args->{'linkitems'});
+ $result.="".mt('Tools:')." | ";
+ $result.=&show_linkitems_toolbar($args->{'linkitems'});
if ($args->{'sort_html'}) {
if ($env{'environment.remotenavmap'} ne 'on') {
$result.=' | | | '.
@@ -1486,11 +1487,10 @@ END
}
# End parameter setting
- $result .= "\n\n";
$result .= "
\n";
# Data
- $result .= '' ."\n";
+ $result.=&Apache::loncommon::start_data_table("LC_tableOfContent");
my $res = "Apache::lonnavmaps::resource";
my %condenseStatuses =
@@ -1505,7 +1505,7 @@ END
$args->{'isNewBranch'} = 0;
$args->{'condensed'} = 0;
- my $location = &Apache::loncommon::lonhttpdurl("/adm/lonIcons/whitespace_21_21.gif");
+ my $location = &Apache::loncommon::lonhttpdurl("/adm/lonIcons/whitespace_21.gif");
$args->{'indentString'} = setDefault($args->{'indentString'}, "");
$args->{'displayedHereMarker'} = 0;
@@ -1734,7 +1734,7 @@ END
$rownum ++;
my $backgroundColor = $backgroundColors[$rownum % scalar(@backgroundColors)];
- $result .= " \n";
+ $result .= &Apache::loncommon::start_data_table_row();
# Set up some data about the parts that the cols might want
my $filter = $it->{FILTER};
@@ -1760,7 +1760,7 @@ END
}
$result .= $colHTML . "\n";
}
- $result .= "
\n";
+ $result .= &Apache::loncommon::end_data_table_row();
$args->{'isNewBranch'} = 0;
}
@@ -1796,8 +1796,8 @@ if (location.href.indexOf('#curloc')==-1
";
}
- $result .= "
";
-
+ $result.=&Apache::loncommon::end_data_table();
+
if ($r) {
$r->print($result);
$result = "";
@@ -1847,6 +1847,41 @@ ENDBLOCK
return $result;
}
+sub show_linkitems_toolbar {
+ my ($linkitems,$condition)=@_;
+ my @linkorder = ("blank","launchnav","closenav","firsthomework",
+ "everything","uncompleted","changefolder","clearbubbles");
+
+ my $result .='
+
+ '."\n';
+ $result .= ' | '."\n";
+
+ return $result;
+}
+
+
1;