Index: openacs-4/packages/acs-templating/tcl/spellcheck-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/spellcheck-init.tcl,v
diff -u -r1.11 -r1.12
--- openacs-4/packages/acs-templating/tcl/spellcheck-init.tcl	26 Feb 2005 16:00:10 -0000	1.11
+++ openacs-4/packages/acs-templating/tcl/spellcheck-init.tcl	10 Jan 2007 21:22:12 -0000	1.12
@@ -61,7 +61,7 @@
 # Build the select options list and filter out unwanted dictionaries.
 set wanted_dicts [list {"No" :nospell:}]
 
-if { [empty_string_p $dicts] } {
+if { $dicts eq "" } {
     # Just add the default locale (the empty string will work too).
     lappend wanted_dicts [list "Yes" $default_lang]
 }