Index: openacs-4/packages/notifications/tcl/notifications-security-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notifications-security-procs.tcl,v
diff -u -N -r1.2 -r1.3
--- openacs-4/packages/notifications/tcl/notifications-security-procs.tcl	20 Sep 2002 21:19:00 -0000	1.2
+++ openacs-4/packages/notifications/tcl/notifications-security-procs.tcl	20 Sep 2002 23:17:36 -0000	1.3
@@ -19,7 +19,7 @@
         or if a user is on vacation. Right now it just makes sure its an 
         approved user.
     } {
-        return [db_string user_approved_p {}]
+        return [db_string user_approved_p {} -default 0]
     }
 
     ad_proc -public can_notify_object_p {