Index: openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/acs-kernel-procs.xql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.xql 18 Feb 2003 20:55:00 -0000 1.3 +++ openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.xql 17 May 2003 10:04:18 -0000 1.4 @@ -19,11 +19,11 @@ - select case when count(object_id) = 0 then 0 else 1 end - from site_nodes - where object_id = (select package_id - from apm_packages - where package_key = 'acs-admin') + select case when count(object_id) = 0 then 0 else 1 end + from site_nodes + where object_id = (select package_id + from apm_packages + where package_key = 'acs-admin')