--- loncom/interface/lonhtmlcommon.pm 2006/07/03 01:02:32 1.139
+++ loncom/interface/lonhtmlcommon.pm 2006/07/03 20:00:20 1.140
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.139 2006/07/03 01:02:32 raeburn Exp $
+# $Id: lonhtmlcommon.pm,v 1.140 2006/07/03 20:00:20 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1025,9 +1025,14 @@ sub crumbs {
sub spellheader {
my $start_page=
&Apache::loncommon::start_page('Speller Suggestions',undef,
- {'only_body' => 1,
- 'js_ready' => 1,
- 'bgcolor' => '#DDDDDD',});
+ {'only_body' => 1,
+ 'js_ready' => 1,
+ 'bgcolor' => '#DDDDDD',
+ 'add_entries' => {
+ 'onload' =>
+ 'document.forms.spellcheckform.submit()',
+ }
+ });
my $end_page=
&Apache::loncommon::end_page({'js_ready' => 1});
@@ -1037,9 +1042,10 @@ sub spellheader {
//
@@ -1053,7 +1059,7 @@ sub spelllink {
my ($form,$field)=@_;
my $linktext=&mt('Check Spelling');
return (<$linktext
+$linktext
ENDLINK
}