--- loncom/interface/lonhtmlcommon.pm	2004/07/16 19:29:26	1.80
+++ loncom/interface/lonhtmlcommon.pm	2004/07/27 23:35:34	1.85
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common html routines
 #
-# $Id: lonhtmlcommon.pm,v 1.80 2004/07/16 19:29:26 matthew Exp $
+# $Id: lonhtmlcommon.pm,v 1.85 2004/07/27 23:35:34 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -783,7 +783,7 @@ sub Increment_PrgWin {
         $str = '1 minute';
     } elsif ($min < 10 && $sec > 1) {
         $str = '[_1] minutes, [_2] seconds';
-    } elsif ($min > 10 || $sec < 2) {
+    } elsif ($min >= 10 || $sec < 2) {
         $str = '[_1] minutes';
     }
     $time_est = &mt($str,$min,$sec);
@@ -869,6 +869,33 @@ sub crumbs {
     return $output.'</font>'.($noformat?'':'</b></tt><br />');
 }
 
+# --------------------- A function that generates a window for the spellchecker
+
+sub spellheader {
+    my $nothing = &javascript_nothing();
+    return (<<ENDCHECK);
+<script type="text/javascript"> 
+var checkwin;
+
+function spellcheckerwindow() {
+    checkwin=window.open($nothing,'spellcheckwin','height=320,width=280,resizable=yes,scrollbars=yes,location=no,menubar=no,toolbar=no');
+    checkwin.document.writeln('<html><body bgcolor="#DDDDDD"><form name="spellcheckform" action="/adm/spellcheck" method="post"><input type="hidden" name="text" value="" /></form></body></html>');
+    checkwin.document.close();
+}
+</script>
+ENDCHECK
+}
+
+# ---------------------------------- Generate link to spell checker for a field
+
+sub spelllink {
+    my ($form,$field)=@_;
+    my $linktext=&mt('Check Spelling');
+    return (<<ENDLINK);
+<a href="javascript:if (typeof(document.$form.onsubmit)!='undefined') { document.$form.onsubmit();};spellcheckerwindow();checkwin.document.forms.spellcheckform.text.value=this.document.forms.$form.$field.value;checkwin.document.forms.spellcheckform.submit();">$linktext</a>
+ENDLINK
+}
+
 # ------------------------------------------------- Output headers for HTMLArea
 
 sub htmlareaheaders {
@@ -1057,7 +1084,7 @@ returns: nothing
                      } @Crumbs
                  );
         $links .= '-&gt;' if ($links ne '');
-        $links .= '<b>'.$last->{'text'}.'</b>';
+        $links .= '<b>'.&mt($last->{'text'}).'</b>';
         #
         my $icons = '';
         $faq = $last->{'faq'} if (exists($last->{'faq'}));
@@ -1077,12 +1104,7 @@ returns: nothing
         #
         if (defined($component)) {
             $Str .= '<td align="right" bgcolor="'.$color.'">'.
-                '<font size="+1">'.&mt($component).'</font>';
-            if (defined($component_help)) {
-                $Str .= 
-                    &Apache::loncommon::help_open_topic($component_help);
-            }
-            $Str.= '</td>';
+                '<font size="+1">'.&mt($component).'</font></td>';
         }
         $Str .= '</tr></table>'."\n";
         #
