version 1.137, 2006/06/26 22:31:56
|
version 1.138, 2006/06/30 04:02:25
|
Line 1178 A link to help for the component will be
|
Line 1178 A link to help for the component will be
|
|
|
All inputs can be undef without problems. |
All inputs can be undef without problems. |
|
|
Inputs: $color (the background color of the table returned), |
Inputs: $component (the large text on the right side of the table), |
$component (the large text on the right side of the table), |
|
$component_help |
$component_help |
$function (role to get colors from) |
|
$domain (domian of role) |
|
$menulink (boolean, controls whether to include a link to /adm/menu) |
$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. |
Returns a string containing breadcrumbs for the current page. |
|
|
=item clear_breadcrumbs |
=item clear_breadcrumbs |
Line 1209 returns: nothing
|
Line 1207 returns: nothing
|
my @Crumbs; |
my @Crumbs; |
|
|
sub breadcrumbs { |
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 |
# Make the faq and bug data cascade |
my $faq = ''; |
my $faq = ''; |
Line 1277 returns: nothing
|
Line 1276 returns: nothing
|
$Str .= $links.'</td>'; |
$Str .= $links.'</td>'; |
# |
# |
if (defined($component)) { |
if (defined($component)) { |
$Str .= '<td class="LC_breadcrumb_component">'. |
$Str .= '<td class="'.$css_class.'_component">'. |
&mt($component).'</td>'; |
&mt($component).'</td>'; |
} |
} |
$Str .= '</tr></table>'."\n"; |
$Str .= '</tr></table>'."\n"; |