Index: openacs-4/packages/notifications/notifications.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/notifications.info,v
diff -u -r1.32 -r1.33
--- openacs-4/packages/notifications/notifications.info	8 Aug 2006 21:27:06 -0000	1.32
+++ openacs-4/packages/notifications/notifications.info	12 Sep 2006 17:51:57 -0000	1.33
@@ -8,16 +8,16 @@
     <singleton-p>t</singleton-p>
     <auto-mount>notifications</auto-mount>
 
-    <version name="5.2.0" url="http://openacs.org/repository/download/apm/notifications-5.2.0.apm">
+    <version name="5.3.0d1" url="http://openacs.org/repository/download/apm/notifications-5.3.0d1.apm">
         <owner url="http://openacs.org">OpenACS</owner>
         <summary>Email notifications management</summary>
         <release-date>2006-02-12</release-date>
         <vendor url="http://openacs.org">OpenACS</vendor>
         <description format="text/html">Provides an API for packages to provide subscription based email notifications and handle replies.  Used by forums, bug-tracker, etc.  The currently prefered package for email notifications.</description>
         <maturity>0</maturity>
 
-        <provides url="notifications" version="5.2.0"/>
-        <requires url="acs-kernel" version="5.2.0d4"/>
+        <provides url="notifications" version="5.3.0d1"/>
+        <requires url="acs-kernel" version="5.3.0d1"/>
         <requires url="acs-mail-lite" version="0.1d"/>
 
         <callbacks>
Index: openacs-4/packages/notifications/tcl/notification-request-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-request-procs.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/notifications/tcl/notification-request-procs.tcl	6 Jul 2005 14:54:55 -0000	1.9
+++ openacs-4/packages/notifications/tcl/notification-request-procs.tcl	12 Sep 2006 17:51:58 -0000	1.10
@@ -71,6 +71,15 @@
         return [db_string request_count {} -default 0]
     }
 
+    ad_proc -public subscribers {
+        {-type_id:required}
+        {-object_id:required}
+    } {
+        returns a list of subscribers for notifications on that object of this type
+    } {
+        return [db_list request_subscribers {}]
+    }
+
     ad_proc -public delete {
         {-request_id:required}
     } {
Index: openacs-4/packages/notifications/tcl/notification-request-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-request-procs.xql,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/notifications/tcl/notification-request-procs.xql	6 Jul 2005 14:54:55 -0000	1.5
+++ openacs-4/packages/notifications/tcl/notification-request-procs.xql	12 Sep 2006 17:51:58 -0000	1.6
@@ -30,4 +30,13 @@
         </querytext>
     </fullquery>
 
+    <fullquery name="notification::request::subscribers.request_subscribers">
+        <querytext>
+            select user_id
+            from notification_requests
+            where type_id = :type_id
+            and object_id = :object_id
+        </querytext>
+    </fullquery>
+
 </queryset>