Index: openacs-4/packages/notifications/tcl/notification-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/tcl/notification-procs.tcl,v diff -u -r1.14 -r1.15 --- openacs-4/packages/notifications/tcl/notification-procs.tcl 27 Jun 2007 18:54:48 -0000 1.14 +++ openacs-4/packages/notifications/tcl/notification-procs.tcl 13 Jan 2008 13:49:02 -0000 1.15 @@ -305,7 +305,13 @@ set extra_vars [ns_set create] oacs_util::vars_to_ns_set \ -ns_set $extra_vars \ - -var_list {notification_id type_id object_id response_id notif_subject notif_text notif_html notif_user notif_date file_ids} + -var_list {notification_id type_id object_id response_id notif_subject notif_text notif_html notif_user file_ids} + + if { $notif_date ne "" } { + oacs_util::vars_to_ns_set \ + -ns_set $extra_vars \ + -var_list {notif_date} + } # Create the notification package_instantiate_object -extra_vars $extra_vars notification