Index: openacs-4/packages/acs-tcl/tcl/parameter-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/parameter-procs.tcl,v diff -u -N -r1.19.4.4 -r1.19.4.5 --- openacs-4/packages/acs-tcl/tcl/parameter-procs.tcl 28 Jul 2017 02:45:26 -0000 1.19.4.4 +++ openacs-4/packages/acs-tcl/tcl/parameter-procs.tcl 20 Dec 2018 18:25:06 -0000 1.19.4.5 @@ -251,15 +251,15 @@ # 2. try to get a package_id for this package_key and use the standard # parameter::get function to get the value if {$value eq ""} { - with_catch errmsg { + if {[catch { set value [parameter::get \ -localize=$localize_p \ -boolean=$boolean_p \ -package_id [apm_package_id_from_key $package_key] \ -parameter $parameter \ -default $default \ ] - } { + } errorMsg]} { set value $default } }