Index: openacs-4/packages/acs-templating/tcl/element-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/element-procs.tcl,v diff -u -r1.17 -r1.18 --- openacs-4/packages/acs-templating/tcl/element-procs.tcl 5 Oct 2003 17:55:55 -0000 1.17 +++ openacs-4/packages/acs-templating/tcl/element-procs.tcl 9 Oct 2003 11:07:40 -0000 1.18 @@ -527,9 +527,10 @@ set values [template::data::transform::$datatype element] } - set spellcheck [lindex [template::util::spellcheck::spellcheck_properties -element_ref element] 0] + # Spell-checker + array set spellcheck [template::util::spellcheck::spellcheck_properties -element_ref element] - if { ![string equal ":nospell:" $spellcheck] } { + if { $spellcheck(perform_p) } { set values [template::data::transform::spellcheck -element_ref element -values $values] }