--- loncom/interface/lonhtmlcommon.pm	2006/06/26 22:31:56	1.137
+++ 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.137 2006/06/26 22:31:56 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".'<table id="LC_breadcrumbs"><tr><td>';
+	$css_class ||= 'LC_breadcrumbs';
+        my $Str = "\n".'<table class="'.$css_class.'"><tr><td>';
         #
         # Make the faq and bug data cascade
         my $faq = '';
@@ -1277,7 +1276,7 @@ returns: nothing
         $Str .= $links.'</td>';
         #
         if (defined($component)) {
-            $Str .= '<td class="LC_breadcrumb_component">'.
+            $Str .= '<td class="'.$css_class.'_component">'.
                 &mt($component).'</td>';
         }
         $Str .= '</tr></table>'."\n";