--- 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 }