Index: openacs-4/packages/acs-admin/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/index.tcl,v diff -u -r1.17.2.1 -r1.17.2.2 --- openacs-4/packages/acs-admin/www/index.tcl 3 May 2020 16:46:05 -0000 1.17.2.1 +++ openacs-4/packages/acs-admin/www/index.tcl 3 May 2020 17:02:45 -0000 1.17.2.2 @@ -6,10 +6,10 @@ } set page_title [ad_conn instance_name] -set package_ids [subsite::package_keys] +set package_keys [subsite::package_keys] set subsite_number [db_string count_subsites [subst { select count(p.package_id) from apm_packages p, site_nodes s - where package_key in ([ns_dbquotelist $package_ids]) + where package_key in ([ns_dbquotelist $package_keys]) and s.object_id = p.package_id }]]