[LON-CAPA-cvs] cvs: loncom /interface lonhtmlcommon.pm

albertel lon-capa-cvs@mail.lon-capa.org
Fri, 30 Jun 2006 04:02:25 -0000


albertel		Fri Jun 30 00:02:25 2006 EDT

  Modified files:              
    /loncom/interface	lonhtmlcommon.pm 
  Log:
  - update documentation, change var to be more descriptive
  
  
Index: loncom/interface/lonhtmlcommon.pm
diff -u loncom/interface/lonhtmlcommon.pm:1.137 loncom/interface/lonhtmlcommon.pm:1.138
--- loncom/interface/lonhtmlcommon.pm:1.137	Mon Jun 26 18:31:56 2006
+++ loncom/interface/lonhtmlcommon.pm	Fri Jun 30 00:02:25 2006
@@ -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 @@
 
 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 @@
     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 @@
         $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";