Index: openacs-4/packages/acs-subsite/tcl/subsite-callback-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/subsite-callback-procs-postgresql.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-subsite/tcl/subsite-callback-procs-postgresql.xql	15 May 2001 16:59:00 -0000	1.1
+++ openacs-4/packages/acs-subsite/tcl/subsite-callback-procs-postgresql.xql	22 Jul 2001 17:28:40 -0000	1.2
@@ -5,14 +5,14 @@
 
 <fullquery name="subsite_callback.select_callbacks">      
       <querytext>
-      FIX ME CONNECT BY
 
 	select distinct callback, callback_type
 	  from subsite_callbacks
-	 where object_type in (select t.object_type
-	                        from acs_object_types t
-	                     connect by prior t.supertype = t.object_type
-	                       start with t.object_type = :object_type)
+	 where object_type in (select t2.object_type
+	                         from acs_object_types t1, acs_object_types t2
+	                        where t2.tree_sortkey <= t1.tree_sortkey
+				  and t1.tree_sortkey like (t2.tree_sortkey || '%')
+				  and t1.object_type = :object_type)
 	   and event_type = :event_type
     
       </querytext>