Index: openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl,v diff -u -r1.129 -r1.130 --- openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl 11 Sep 2024 06:15:48 -0000 1.129 +++ openacs-4/packages/acs-tcl/tcl/apm-install-procs.tcl 8 Oct 2024 14:13:36 -0000 1.130 @@ -495,11 +495,13 @@ if {![info exists repository($package_key)]} continue - array unset version - array set version $repository($package_key) + set version $repository($package_key) set satisfied_p 1 - foreach req [concat $version(embeds) $version(extends) $version(requires)] { + foreach req [concat \ + [dict get $version embeds] \ + [dict get $version extends] \ + [dict get $version requires]] { lassign $req req_uri req_version if { ![info exists provided($req_uri)] @@ -533,7 +535,7 @@ lappend result(packages) $package_key # Record what this package provides, and remove it from the required list, if appropriate - foreach prov $version(provides) { + foreach prov [dict get $version provides] { lassign $prov prov_uri prov_version # If what we provide is not already provided, or the alredady provided version is # less than what we provide, record this new provision