Index: openacs-4/packages/acs-templating/tcl/spellcheck-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/spellcheck-procs.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/acs-templating/tcl/spellcheck-procs.tcl	23 Oct 2003 10:52:06 -0000	1.8
+++ openacs-4/packages/acs-templating/tcl/spellcheck-procs.tcl	29 Oct 2003 12:59:52 -0000	1.9
@@ -199,7 +199,6 @@
 	ad_script_abort
     }
     
-    
     # read will occasionally error out with "interrupted system call",
     # so retry a few times in the hopes that it will go away.
     set try 0
@@ -210,6 +209,8 @@
 	ns_log Notice "spellchecker had a problem: $errmsg"
     }
 
+    fconfigure $ispell_proc -blocking 0
+    
     if { [catch { close $ispell_proc } errmsg] } {
 	ad_return_error "No dictionary found" "Spell-checking is enabled but the spell-check dictionary could not be reached. Check that the dictionary exists, and that its permissions are correct. <p>Here is the error message: <pre>$errmsg</pre>"
 	ad_script_abort