version 1.62, 2004/04/06 15:07:41
|
version 1.63, 2004/04/07 22:33:00
|
Line 899 All inputs can be undef without problems
|
Line 899 All inputs can be undef without problems
|
Inputs: $color (the background color of the table returned), |
Inputs: $color (the background color of the table returned), |
$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) |
|
|
Returns a string containing breadcrumbs for the current page. |
Returns a string containing breadcrumbs for the current page. |
|
|
Line 924 returns: nothing
|
Line 927 returns: nothing
|
my @Crumbs; |
my @Crumbs; |
|
|
sub breadcrumbs { |
sub breadcrumbs { |
my ($color,$component,$component_help,$function,$domain) = @_; |
my ($color,$component,$component_help,$function,$domain,$menulink) = |
|
@_; |
if (! defined($color)) { |
if (! defined($color)) { |
if (! defined($function)) { |
if (! defined($function)) { |
$function = &Apache::loncommon::get_users_function(); |
$function = &Apache::loncommon::get_users_function(); |
Line 945 returns: nothing
|
Line 949 returns: nothing
|
my $last = pop(@Crumbs); |
my $last = pop(@Crumbs); |
# |
# |
# The first one should be the course, I guess. |
# The first one should be the course, I guess. |
if (exists($ENV{'request.course.id'})) { |
if (!defined($menulink)) { $menulink=1; } |
|
if ($menulink && exists($ENV{'request.course.id'})) { |
my $cid = $ENV{'request.course.id'}; |
my $cid = $ENV{'request.course.id'}; |
unshift(@Crumbs,{ |
unshift(@Crumbs,{ |
href=>'/adm/menu', |
href=>'/adm/menu', |