Index: openacs-4/packages/xowiki/tcl/chat-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/chat-procs.tcl,v diff -u -r1.54.2.22 -r1.54.2.23 --- openacs-4/packages/xowiki/tcl/chat-procs.tcl 15 Nov 2021 17:23:27 -0000 1.54.2.22 +++ openacs-4/packages/xowiki/tcl/chat-procs.tcl 16 Nov 2021 11:04:06 -0000 1.54.2.23 @@ -231,7 +231,7 @@ if { [nsv_exists ${:array}-color ${:user_id}] } { return } else { - set colors [parameter::get -parameter UserColors -default [[:info class] set colors]] + set colors [::parameter::get -parameter UserColors -default [[:info class] set colors]] # ns_log notice "getting colors of [:info class] = [info exists colors]" set color [lindex $colors [expr { [nsv_get ${:array}-color idx] % [llength $colors] }]] ::acs::clusterwide nsv_set ${:array}-color ${:user_id} $color @@ -508,7 +508,7 @@ } # get LinkRegex parameter from the chat package - set link_regex [parameter::get_global_value \ + set link_regex [::parameter::get_global_value \ -package_key "chat" \ -parameter "LinkRegex"]