Index: openacs-4/packages/acs-tcl/tcl/install-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/install-procs.tcl,v diff -u -N -r1.11 -r1.12 --- openacs-4/packages/acs-tcl/tcl/install-procs.tcl 22 Feb 2005 20:20:08 -0000 1.11 +++ openacs-4/packages/acs-tcl/tcl/install-procs.tcl 16 Mar 2005 14:14:20 -0000 1.12 @@ -514,9 +514,13 @@

<package [ id="id" | key="package-key" | url="package-url" ] />

} { set id [apm_attribute_value -default "" $node package-id] - set package_key [apm_attribute_value -default "" $node package-key] set url [apm_attribute_value -default "" $node url] + set package_key [apm_attribute_value -default "" $node package-key] + if {[string equal $package_key ""]} { + set package_key [apm_attribute_value -default "" $node package] + } + # Remove double slashes regsub -all {//} $url "/" url