Index: openacs-4/packages/chat/tcl/apm-callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/chat/tcl/apm-callback-procs.tcl,v diff -u -r1.1.2.2 -r1.1.2.3 --- openacs-4/packages/chat/tcl/apm-callback-procs.tcl 7 Mar 2019 14:11:09 -0000 1.1.2.2 +++ openacs-4/packages/chat/tcl/apm-callback-procs.tcl 7 Mar 2019 14:16:00 -0000 1.1.2.3 @@ -26,11 +26,11 @@ ServerPort ShowAvatarP } - ::xo::dc foreach [subst { + ::xo::dc foreach get_parameters [subst { select parameter_id, parameter_name from apm_parameters where package_key = 'chat' - and parameter_name in ('[join $parameter_names ']') + and parameter_name in ('[join $parameter_names ',']') }] { apm_parameter_unregister \ -package_key chat $parameter_id