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 -r1.3 -r1.3.2.1
--- openacs-4/packages/notifications/tcl/notifications-security-procs.tcl	20 Sep 2002 23:17:36 -0000	1.3
+++ openacs-4/packages/notifications/tcl/notifications-security-procs.tcl	30 Oct 2002 21:12:05 -0000	1.3.2.1
@@ -1,6 +1,8 @@
 ad_library {
 
     Notifications Security Library
+    
+    Manage permissions for notifications.
 
     @creation-date 2002-05-27
     @author Ben Adida <ben@openforce.biz>
@@ -14,6 +16,7 @@
         {-user_id:required}
         {-delivery_method_id ""}
     } {
+	Can a user be notified for a given delivery method.
         This proc can be expanded to deal with cases when we don't want to 
         send a notification.  For instance we could check email_bouncing_p 
         or if a user is on vacation. Right now it just makes sure its an 
@@ -25,7 +28,10 @@
     ad_proc -public can_notify_object_p {
         {-user_id ""}
         {-object_id:required}
-    } { 
+    } {
+	This checks if a user can request notification on a given object.
+	Probably should just check read permission. RIGHT NOW HACKED to 1.
+    } {
         # hack
         return 1
     }
@@ -34,12 +40,16 @@
         {-user_id ""}
         {-object_id:required}
     } {
+	Require the ability to notify on an object.
+    } {
     }
 
     ad_proc -public can_admin_request_p {
         {-user_id ""}
         {-request_id:required}
     } {
+	Checks if a user can manage a given notification request. RIGHT NOW HACKED to 1.
+    } {
         # hack
         return 1
     } 
@@ -48,6 +58,8 @@
         {-user_id ""}
         {-request_id:required}
     } {
+	Require the ability to admin a request
+    } {
     }