Index: openacs-4/packages/acs-admin/lib/service-parameters.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/lib/service-parameters.tcl,v
diff -u -r1.7.12.3 -r1.7.12.4
--- openacs-4/packages/acs-admin/lib/service-parameters.tcl	12 Sep 2015 11:01:22 -0000	1.7.12.3
+++ openacs-4/packages/acs-admin/lib/service-parameters.tcl	10 Nov 2016 14:45:09 -0000	1.7.12.4
@@ -12,17 +12,19 @@
 set user_id [ad_conn user_id]
 set swadmin_p 0
 db_multirow -extend { url admin_url param_url } packages services_select {} {
-    if { [file exists "[acs_package_root_dir $package_key]/www/"] } {
-        catch {
-            set url [apm_package_url_from_key $package_key]
-            if { $url ne "" && [file exists "[acs_package_root_dir $package_key]/www/admin/"] } {
-                set admin_url "${url}admin/"
-            }
-            if { [file exists "[acs_package_root_dir $package_key]/www/sitewide-admin/"] } {
-                set sitewide_admin_url "/acs-admin/package/$package_key/"
-                set swadmin_p 1
-            }
+    set root_dir [acs_package_root_dir $package_key]
+    if { [file exists $root_dir/www/] } {
+        set url [apm_package_url_from_key $package_key]
+        if { $url ne "" && [file exists $root_dir/www/admin/] } {
+            set admin_url "${url}admin/"
         }
+        if { [file exists $root_dir/www/sitewide-admin/] } {
+            set sitewide_admin_url "/acs-admin/package/$package_key/"
+            set swadmin_p 1
+        }
+        if {[glob -nocomplain $root_dir/www/index.*] eq ""} {
+            set url ""
+        }
     }
     if { $parameter_count > 0 } {
         set param_url [export_vars -base "/shared/parameters" { package_id { return_url {[ad_return_url]} } }]