Index: openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl 13 Mar 2001 22:59:27 -0000 1.1 +++ openacs-4/packages/acs-tcl/tcl/tcl-documentation-procs.tcl 9 Feb 2002 02:33:35 -0000 1.2 @@ -968,7 +968,7 @@ } else { # This is an array: verify the [array get] form of the array if { ![info exists apc_signatures($formal_name)] || \ - ![ad_verify_signature [array get var] $apc_signatures($formal_name)] } { + ![ad_verify_signature [lsort [array get var]] $apc_signatures($formal_name)] } { ad_complain -key $formal_name:verify "The signature for the variable '$formal_name' was incorrect." continue }