Index: openacs-4/packages/notifications/tcl/notification-reply-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-reply-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/notifications/tcl/notification-reply-procs.tcl	29 Jun 2002 00:21:11 -0000	1.3
+++ openacs-4/packages/notifications/tcl/notification-reply-procs.tcl	30 Nov 2002 17:40:18 -0000	1.4
@@ -1,7 +1,10 @@
 ad_library {
 
-    Notification Replies
+    Notification Replies.
 
+    When a user replies to a notification, this reply must be stored and handled appropriately.
+    These procs help to manage such handling.
+
     @creation-date 2002-06-02
     @author Ben Adida <ben@openforce.biz>
     @cvs-id $Id$
@@ -19,7 +22,7 @@
         {-content:required}
         {-reply_date ""}
     } {
-        create a new reply
+        store a new reply
     } {
         set extra_vars [ns_set create]
         oacs_util::vars_to_ns_set -ns_set $extra_vars -var_list {reply_id object_id type_id from_user subject content reply_date}
@@ -33,7 +36,7 @@
         {-reply_id:required}
         {-array:required}
     } {
-        Get the information for the reply
+        Get the information for the reply in a Tcl array
     } {
         # Select the info into the upvar'ed Tcl Array
         upvar $array row
@@ -43,7 +46,7 @@
     ad_proc -public delete {
         {-reply_id:required}
     } {
-        delete a reply
+        delete a reply, usually after it's been processed.
     } {
         db_exec_plsql delete_reply {}
     }