Index: openacs-4/packages/xml-rpc/tcl/system-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xml-rpc/tcl/system-procs.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/xml-rpc/tcl/system-procs.tcl	29 Jan 2020 19:37:07 -0000	1.6
+++ openacs-4/packages/xml-rpc/tcl/system-procs.tcl	8 Oct 2024 15:27:42 -0000	1.7
@@ -71,7 +71,7 @@
     foreach call $array {
         # parse the call for methodName and params
         if { [catch {
-            array unset c
+            unset -nocomplain c
             array set c $call
             set method $c(methodName)
             set params $c(params)