Index: openacs-4/packages/notifications/tcl/notification-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-procs.xql,v
diff -u -N -r1.10 -r1.11
--- openacs-4/packages/notifications/tcl/notification-procs.xql	15 Jun 2005 18:33:19 -0000	1.10
+++ openacs-4/packages/notifications/tcl/notification-procs.xql	2 Sep 2008 22:31:04 -0000	1.11
@@ -55,10 +55,13 @@
 
     <fullquery name="notification::new.select_notification_requests">
         <querytext>
-            select user_id, interval_id, delivery_method_id, format
-            from   notification_requests
+            select cc.user_id, interval_id, delivery_method_id, format
+            from   notification_requests nr, cc_users cc
             where  type_id = :type_id
-            and    object_id = :object_id
+            and    nr.object_id = :object_id
+            and    nr.user_id = cc.user_id
+            and    cc.member_state = 'approved'
+
         </querytext>
     </fullquery>