Index: openacs-4/packages/acs-subsite/tcl/group-type-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/group-type-procs-oracle.xql,v
diff -u -r1.3.2.2 -r1.3.2.3
--- openacs-4/packages/acs-subsite/tcl/group-type-procs-oracle.xql	3 Mar 2020 16:11:12 -0000	1.3.2.2
+++ openacs-4/packages/acs-subsite/tcl/group-type-procs-oracle.xql	3 Mar 2020 16:13:59 -0000	1.3.2.3
@@ -1,55 +1,47 @@
 <?xml version="1.0"?>
 
 <queryset>
-   <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
+  <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
 
-<partialquery name="group_type::new.drop_type">      
-      <querytext>
-
-begin acs_object_type.drop_type('$group_type'); end;
-      
-      </querytext>
+<partialquery name="group_type::new.drop_type">
+  <querytext>
+    begin acs_object_type.drop_type('$group_type'); end;
+  </querytext>
 </partialquery>
 
- 
-<partialquery name="group_type::new.create_type">      
-      <querytext>
 
-BEGIN
- acs_object_type.create_type (
-   supertype     => :supertype,
-   object_type   => :group_type,
-   pretty_name   => :pretty_name,
-   pretty_plural => :pretty_plural,
-   table_name    => upper(:table_name),
-   id_column     => :id_column,
-   package_name  => :package_name
- );
-END;      
-
-      </querytext>
+<partialquery name="group_type::new.create_type">
+  <querytext>
+    BEGIN
+     acs_object_type.create_type (
+       supertype     => :supertype,
+       object_type   => :group_type,
+       pretty_name   => :pretty_name,
+       pretty_plural => :pretty_plural,
+       table_name    => upper(:table_name),
+       id_column     => :id_column,
+       package_name  => :package_name
+     );
+    END;
+  </querytext>
 </partialquery>
 
- 
-<partialquery name="group_type::new.update_type">      
-      <querytext>
 
-update acs_object_types set dynamic_p='t' where object_type = :group_type
-
-      </querytext>
+<partialquery name="group_type::new.update_type">
+  <querytext>
+    update acs_object_types set dynamic_p='t' where object_type = :group_type
+  </querytext>
 </partialquery>
 
- 
-<partialquery name="group_type::new.copy_rel_types">      
-      <querytext>
 
-	insert into group_type_rels 
-	(group_rel_type_id, rel_type, group_type)
-	select acs_object_id_seq.nextval, r.rel_type, :group_type
-	  from group_type_rels r
-	 where r.group_type = :supertype
-
-      </querytext>
+<partialquery name="group_type::new.copy_rel_types">
+  <querytext>
+    insert into group_type_rels
+    (group_rel_type_id, rel_type, group_type)
+    select acs_object_id_seq.nextval, r.rel_type, :group_type
+    from group_type_rels r
+    where r.group_type = :supertype
+  </querytext>
 </partialquery>
 
 <partialquery name="group_type::delete.package_exists">