Index: openacs-4/packages/xml-rpc/tcl/validator-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xml-rpc/tcl/validator-procs.tcl,v diff -u -N -r1.5 -r1.6 --- openacs-4/packages/xml-rpc/tcl/validator-procs.tcl 9 May 2018 15:33:33 -0000 1.5 +++ openacs-4/packages/xml-rpc/tcl/validator-procs.tcl 11 Mar 2019 19:38:04 -0000 1.6 @@ -60,7 +60,7 @@ # Return the sum of the values larry, curly and moe. proc validator1.easyStructTest {struct} { - # De-list-ify the stuct: + # De-list-ify the struct: array set bigStruct $struct # Return the sum as an integer: return [list -int [expr \