--- loncom/interface/lonhtmlcommon.pm 2006/06/22 23:22:41 1.136
+++ loncom/interface/lonhtmlcommon.pm 2006/06/30 04:02:25 1.138
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.136 2006/06/22 23:22:41 albertel Exp $
+# $Id: lonhtmlcommon.pm,v 1.138 2006/06/30 04:02:25 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1178,13 +1178,11 @@ A link to help for the component will be
All inputs can be undef without problems.
-Inputs: $color (the background color of the table returned),
- $component (the large text on the right side of the table),
+Inputs: $component (the large text on the right side of the table),
$component_help
- $function (role to get colors from)
- $domain (domian of role)
$menulink (boolean, controls whether to include a link to /adm/menu)
-
+ $helplink (if 'nohelp' don't include the orange help link)
+ $css_class (optional name for the class to apply to the table for CSS)
Returns a string containing breadcrumbs for the current page.
=item clear_breadcrumbs
@@ -1209,9 +1207,10 @@ returns: nothing
my @Crumbs;
sub breadcrumbs {
- my ($component,$component_help,$menulink,$helplink) = @_;
+ my ($component,$component_help,$menulink,$helplink,$css_class) = @_;
#
- my $Str = "\n".'
';
+ $css_class ||= 'LC_breadcrumbs';
+ my $Str = "\n".'';
#
# Make the faq and bug data cascade
my $faq = '';
@@ -1266,9 +1265,9 @@ returns: nothing
# $icons .= &Apache::loncommon::help_open_bug($bug);
# }
if ($helplink ne 'nohelp') {
- $icons .= &Apache::loncommon::help_open_menu(undef,$component,
+ $icons .= &Apache::loncommon::help_open_menu($component,
$component_help,
- undef,$faq,$bug);
+ $faq,$bug);
}
if ($icons ne '') {
$Str .= $icons.' ';
@@ -1277,7 +1276,7 @@ returns: nothing
$Str .= $links.' | ';
#
if (defined($component)) {
- $Str .= ''.
+ $Str .= ' | '.
&mt($component).' | ';
}
$Str .= ' '."\n";
|