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

[albertel]

albertel		Tue Aug 17 15:09:33 2004 EDT

  Modified files:              (Branch: version_1_2_X)
    /loncom/interface	lonhtmlcommon.pm 
  Log:
   - backport 1.87
  
  
Index: loncom/interface/lonhtmlcommon.pm
diff -u loncom/interface/lonhtmlcommon.pm:1.84 loncom/interface/lonhtmlcommon.pm:1.84.2.1
--- loncom/interface/lonhtmlcommon.pm:1.84	Mon Jul 26 17:57:27 2004
+++ loncom/interface/lonhtmlcommon.pm	Tue Aug 17 15:09:33 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common html routines
 #
-# $Id: lonhtmlcommon.pm,v 1.84 2004/07/26 21:57:27 albertel Exp $
+# $Id: lonhtmlcommon.pm,v 1.84.2.1 2004/08/17 19:09:33 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1005,8 +1005,8 @@
     my @Crumbs;
     
     sub breadcrumbs {
-        my ($color,$component,$component_help,$function,$domain,$menulink) =
-	    @_;
+        my ($color,$component,$component_help,$function,$domain,$menulink,
+	    $helplink) = @_;
         if (! defined($color)) {
             if (! defined($function)) {
                 $function = &Apache::loncommon::get_users_function();
@@ -1068,7 +1068,9 @@
 #        if ($bug ne '') {
 #            $icons .= &Apache::loncommon::help_open_bug($bug);
 #        }
-        $icons .= &Apache::loncommon::help_open_menu($color,$component,$component_help,$function,$faq,$bug);
+	if ($helplink ne 'nohelp') {
+	    $icons .= &Apache::loncommon::help_open_menu($color,$component,$component_help,$function,$faq,$bug);
+	}
         if ($icons ne '') {
             $Str .= $icons.' ';
         }