Index: openacs-4/packages/acs-subsite/tcl/relation-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/relation-procs-postgresql.xql,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-subsite/tcl/relation-procs-postgresql.xql	9 Sep 2001 16:34:56 -0000	1.5
+++ openacs-4/packages/acs-subsite/tcl/relation-procs-postgresql.xql	4 Dec 2001 00:20:47 -0000	1.6
@@ -58,7 +58,7 @@
 		from
 			acs_object_types t1,
 			acs_object_types t2
-		where	t2.tree_sortkey like (t1.tree_sortkey || '%')
+		where	t2.tree_sortkey between t1.tree_sortkey and tree_right(t1.tree_sortkey)
 		  and   t1.object_type = :start_with) types left join
 		(select
 			rel_type