Index: openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.xql,v
diff -u -r1.2.4.1 -r1.2.4.2
--- openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.xql	11 Feb 2003 17:06:36 -0000	1.2.4.1
+++ openacs-4/packages/acs-tcl/tcl/acs-kernel-procs.xql	18 Feb 2003 01:44:30 -0000	1.2.4.2
@@ -4,26 +4,26 @@
 <fullquery name="ad_acs_administrator_exists_p.admin_exists_p">      
       <querytext>
       
-	select 1 as admin_exists_p
-	from dual
-	where exists (select 1
-		      from all_object_party_privilege_map m, users u, acs_magic_objects amo
-		      where m.object_id = amo.object_id
+        select 1 as admin_exists_p
+        from dual
+        where exists (select 1
+                      from all_object_party_privilege_map m, users u, acs_magic_objects amo
+                      where m.object_id = amo.object_id
                         and amo.name = 'security_context_root'
-		        and m.party_id = u.user_id
-		        and m.privilege = 'admin')
+                        and m.party_id = u.user_id
+                        and m.privilege = 'admin')
     
       </querytext>
 </fullquery>
 
 <fullquery name="ad_acs_admin_node.acs_admin_node_p">      
       <querytext>
       
-	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')
     
       </querytext>
 </fullquery>