--- loncom/interface/lonhtmlcommon.pm 2004/07/27 23:35:34 1.85
+++ loncom/interface/lonhtmlcommon.pm 2004/08/17 19:02:57 1.87
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.85 2004/07/27 23:35:34 www Exp $
+# $Id: lonhtmlcommon.pm,v 1.87 2004/08/17 19:02:57 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -875,6 +875,7 @@ sub spellheader {
my $nothing = &javascript_nothing();
return (<
+// BEGIN LON-CAPA Internal
var checkwin;
function spellcheckerwindow() {
@@ -882,6 +883,7 @@ function spellcheckerwindow() {
checkwin.document.writeln('');
checkwin.document.close();
}
+// END LON-CAPA Internal
ENDCHECK
}
@@ -1032,8 +1034,8 @@ returns: nothing
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();
@@ -1095,7 +1097,9 @@ returns: nothing
# 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.' ';
}