--- loncom/interface/lonhtmlcommon.pm	2004/04/06 15:07:41	1.62
+++ loncom/interface/lonhtmlcommon.pm	2004/04/07 22:33:00	1.63
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common html routines
 #
-# $Id: lonhtmlcommon.pm,v 1.62 2004/04/06 15:07:41 matthew Exp $
+# $Id: lonhtmlcommon.pm,v 1.63 2004/04/07 22:33:00 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -899,6 +899,9 @@ 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),
         $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.
 
@@ -924,7 +927,8 @@ returns: nothing
     my @Crumbs;
     
     sub breadcrumbs {
-        my ($color,$component,$component_help,$function,$domain) = @_;
+        my ($color,$component,$component_help,$function,$domain,$menulink) =
+	    @_;
         if (! defined($color)) {
             if (! defined($function)) {
                 $function = &Apache::loncommon::get_users_function();
@@ -945,7 +949,8 @@ returns: nothing
         my $last = pop(@Crumbs);
         #
         # 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'};
             unshift(@Crumbs,{
                              href=>'/adm/menu',