Index: openacs-4/packages/cms/tcl/form-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/cms/tcl/form-procs-postgresql.xql,v diff -u -r1.5 -r1.6 --- openacs-4/packages/cms/tcl/form-procs-postgresql.xql 29 Jul 2001 23:44:43 -0000 1.5 +++ openacs-4/packages/cms/tcl/form-procs-postgresql.xql 11 Aug 2001 17:40:26 -0000 1.6 @@ -167,13 +167,13 @@ - + $defArray($param) - + null @@ -250,7 +250,7 @@ select [join $args ","] from - acs_attributes RIGHT OUTER JOIN + acs_attributes, ( select o2.object_type, tree_level(o2.tree_sortkey) as type_order @@ -265,8 +265,10 @@ AND o1.tree_sortkey like (o2.tree_sortkey || '%') - ) types USING (object_type) + ) types where + object_type = ancestor + and attribute_name <> 'ldap dn' order by type_order desc, sort_order