Index: openacs-4/packages/acs-subsite/www/admin/rel-types/new-2-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/rel-types/new-2-postgresql.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-subsite/www/admin/rel-types/new-2-postgresql.xql	11 Aug 2001 21:31:03 -0000	1.2
+++ openacs-4/packages/acs-subsite/www/admin/rel-types/new-2-postgresql.xql	19 Aug 2001 16:32:15 -0000	1.3
@@ -3,26 +3,13 @@
 <queryset>
    <rdbms><type>postgresql</type><version>7.1</version></rdbms>
 
-<fullquery name="select_object_types">      
+<fullquery name="select_object_types_2">      
       <querytext>
 
-    select lpad('&nbsp;', (level - 1) * 4) || t.pretty_name, 
+    select lpad('&nbsp;', (tree_level(tree_sortkey) - 1) * 4) || t.pretty_name, 
            t.object_type as rel_type
       from acs_object_types t
      where tree_sortkey like (select tree_sortkey || '%' from acs_object_types
-				where object_type= :max_object_type_one)
-
-      </querytext>
-</fullquery>
-
- 
-<fullquery name="select_object_types">      
-      <querytext>
-
-    select lpad('&nbsp;', (level - 1) * 4) || t.pretty_name, 
-           t.object_type as rel_type
-      from acs_object_types t
-     where tree_sortkey like (select tree_sortkey || '%' from acs_object_types
 				where object_type = :max_object_type_one)
 
       </querytext>