--- loncom/homework/inputtags.pm	2012/08/21 18:24:28	1.307
+++ loncom/homework/inputtags.pm	2012/09/10 09:50:57	1.308
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # input  definitons
 #
-# $Id: inputtags.pm,v 1.307 2012/08/21 18:24:28 raeburn Exp $
+# $Id: inputtags.pm,v 1.308 2012/09/10 09:50:57 foxr Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -197,9 +197,11 @@ sub start_textfield {
 	    if ($addchars) {
 		$result.=&addchars('HWVAL_'.$resid,$addchars);
 	    }
-            my $textareaclass = 'class="LC_richDetectHtml"';
-	    $result.= '<textarea wrap="hard" name="HWVAL_'.$resid.'" id="HWVAL_'.$resid.'" '.
-		      'rows="'.$rows.'" cols="'.$cols.'" '.$textareaclass.'>'.
+            my $textareaclass = 'class="LC_richDetectHtml spellchecked"';
+	    $result.= '<textarea wrap="hard" name="HWVAL_'.$resid.'" id="HWVAL_'.$resid.'" ' .
+		      'rows="'.$rows.'" cols="'.$cols.'" '.$textareaclass
+		      . "onblur='\$(this).spellchecker(\"check\")'"
+		      .'>'.
                       &HTML::Entities::encode($oldresponse,'<>&"');
 	    if ($oldresponse ne '') {
 
@@ -381,7 +383,8 @@ sub start_textline {
 		    $name = "none";
 		}
 		$result.= '<input onkeydown="javascript:setSubmittedPart(\''.$partid.'\');" type="text" '.$readonly.' name="'.$name.'" value="'.
-		    $oldresponse.'" size="'.$size.'"'.$maxlength.' />';
+		    $oldresponse.'" class="spellchecked"  size="'.$size.'"'.$maxlength.'
+                    onblur=' . "'\$(this).spellchecker(\"check\")'"  . '/>';
 	    }
 	    if ($Apache::lonhomework::type eq 'exam'
 		&& &needs_exam_box($tagstack)) {