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 -N -r1.18 -r1.19
--- openacs-4/packages/acs-templating/tcl/spellcheck-init.tcl	24 Dec 2017 12:56:09 -0000	1.18
+++ openacs-4/packages/acs-templating/tcl/spellcheck-init.tcl	29 Dec 2017 09:53:47 -0000	1.19
@@ -31,7 +31,7 @@
 #
 if { [string match "*aspell*" $bin] } {
     # aspell
-    with_catch errmsg {
+    ad_try {
         set dicts [exec $bin dump dicts]
         set default_lang [exec $bin config lang]
         if { !$dialects_p } {
@@ -40,8 +40,8 @@
             # one of the names in the pull-down menu.
             set default_lang [string range $default_lang 0 1]
         }
-    } {
-        ns_log Warning "Gettings dicts and default_lang for aspell failed with error message: \"$errmsg\""
+    } on error {errorMsg} {
+        ns_log Warning "Gettings dicts and default_lang for aspell failed with error message: \"$errorMsg\""
 	ns_log Notice "You might want to upgrade to a more recent version of Aspell ... http://aspell.sourceforge.net/"
     }
 } elseif { [string match "*ispell*" $bin] } {