Index: openacs-4/contrib/obsolete-packages/bboard/tcl/bboard-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/bboard/tcl/bboard-procs-postgresql.xql,v
diff -u -r1.8 -r1.9
--- openacs-4/contrib/obsolete-packages/bboard/tcl/bboard-procs-postgresql.xql	1 Dec 2001 22:25:53 -0000	1.8
+++ openacs-4/contrib/obsolete-packages/bboard/tcl/bboard-procs-postgresql.xql	8 Dec 2001 01:17:59 -0000	1.9
@@ -225,7 +225,7 @@
          from bboard_thread_subscribers bs, acs_messages m, acs_messages m2
 	 where bs.subscriber_id = :user_id
 	   and bs.thread_id = m.message_id 
-           m2.message_id = :message_id
+           and m2.message_id = :message_id
            and m.tree_sortkey between m2.tree_sortkey and tree_right(m2.tree_sortkey)
 
       </querytext>
@@ -409,14 +409,12 @@
 
 <partialquery name="bboard_schedule_sends.thread_subscribers">      
   <querytext>
-        select subscriber_id as recipient_id, thread_id as grouping_id,
+        select s.subscriber_id as recipient_id, s.thread_id as grouping_id,
                now() as wait_until
           from bboard_thread_subscribers s, acs_messages m, acs_messages m2
          where s.thread_id = m.message_id
            and m2.message_id = :message_id
-           and m.tree_sortkey between
-             substr(m2.tree_sortkey, 1, position('/' in substr(m2.tree_sortkey, 2)))
-             and tree_right(substr(m2.tree_sortkey, 1, position('/' in substr(m2.tree_sortkey, 2))))
+           and m.tree_sortkey between tree_root_key(m2.tree_sortkey) and tree_right(tree_root_key(m2.tree_sortkey))
            and exists (select 1
                        from all_object_party_privilege_map map
                        where map.object_id = :message_id and