Index: openacs-4/packages/acs-admin/www/apm/packages-install-4.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/packages-install-4.tcl,v diff -u -r1.19.2.8 -r1.19.2.9 --- openacs-4/packages/acs-admin/www/apm/packages-install-4.tcl 22 Feb 2017 12:56:12 -0000 1.19.2.8 +++ openacs-4/packages/acs-admin/www/apm/packages-install-4.tcl 24 Feb 2017 14:43:28 -0000 1.19.2.9 @@ -51,13 +51,14 @@ continue } - if {[apm_package_version_installed_p $version(package.key) $version(name)] } { - #ns_log notice "===== ALREADY-installed $version(package.key)" + set package_key $version(package.key) + + if {[apm_package_version_installed_p $package_key $version(name)] } { + #ns_log notice "===== ALREADY installed $package_key" # Already installed. continue } - set package_key $version(package.key) set version_files $version(files) set data_model_files [list] @@ -86,7 +87,7 @@ set enable_p 1 if {[catch { - ns_log notice "===== INSTALL $version(package.key)" + ns_log notice "===== INSTALL $package_key" set version_id [apm_package_install \ -enable=$enable_p \ -package_path $package_path \ @@ -95,7 +96,7 @@ -data_model_files $data_model_files \ -mount_path $selected_mount_path \ $spec_file] - ns_log notice "===== INSTALL $version(package.key) DONE" + ns_log notice "===== INSTALL $package_key DONE" } errorMsg]} { ns_write "Error: $errorMsg\n"