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] } {