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.7 -r1.8
--- openacs-4/packages/acs-admin/www/index.tcl	28 Aug 2003 09:41:37 -0000	1.7
+++ openacs-4/packages/acs-admin/www/index.tcl	28 Aug 2003 11:59:01 -0000	1.8
@@ -7,19 +7,9 @@
 
 set page_title "[ad_conn instance_name] for [ad_system_name]"
 
-db_multirow subsites subsite_admin_urls {
-    select site_node.url(node_id) || 'admin/' as admin_url, 
-           instance_name
-    from site_nodes s, apm_packages p
-    where s.object_id = p.package_id
-    and p.package_key = 'acs-subsite'
-}
+db_multirow subsites subsite_admin_urls {}
 
-db_multirow -extend { admin_url } packages installed_packages {
-    select package_key,
-           pretty_name as pretty_name
-    from apm_package_types
-} {
+db_multirow -extend { admin_url } packages installed_packages {} {
     if { [apm_package_installed_p $package_key] && [file exists "[acs_package_root_dir $package_key]/www/sitewide-admin/"] } {
         set admin_url "package/$package_key/"
     } else {