Index: openacs-4/packages/acs-subsite/www/admin/rel-segments/new-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/rel-segments/new-postgresql.xql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/acs-subsite/www/admin/rel-segments/new-postgresql.xql 15 May 2001 16:59:00 -0000 1.1 +++ openacs-4/packages/acs-subsite/www/admin/rel-segments/new-postgresql.xql 11 Aug 2001 21:31:03 -0000 1.2 @@ -5,14 +5,12 @@ - FIX ME CONNECT BY - select t.pretty_name, t.object_type as rel_type, - replace(lpad(' ', (level - 1) * 4), ' ', ' ') as indent + lpad(' ', (level - 1) * 4) as indent from acs_object_types t where t.object_type not in (select s.rel_type from rel_segments s where s.group_id = :group_id) - connect by prior t.object_type = t.supertype - start with t.object_type in ('membership_rel', 'composition_rel') + and (t.tree_sortkey like (select tree_sortkey || '%' from acs_object_types where object_type='membership_rel') or + t.tree_sortkey like (select tree_sortkey || '%' from acs_object_types where object_type='composition_rel')) order by lower(t.pretty_name) desc