Index: openacs-4/packages/evaluation/tcl/evaluation-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/tcl/evaluation-procs.tcl,v diff -u -r1.31.2.8 -r1.31.2.9 --- openacs-4/packages/evaluation/tcl/evaluation-procs.tcl 22 Sep 2006 16:36:23 -0000 1.31.2.8 +++ openacs-4/packages/evaluation/tcl/evaluation-procs.tcl 24 Oct 2006 10:38:46 -0000 1.31.2.9 @@ -194,6 +194,7 @@ -notif_type:required {-evaluation_id ""} {-edit_p 0} + {-subset {}} } { db_1row select_names { *SQL* } @@ -234,12 +235,13 @@ # Notifies the users that requested notification for the specific object notification::new \ - -type_id [notification::type::get_type_id -short_name $notif_type] \ - -object_id $package_id \ - -response_id $response_id \ - -notif_subject $notif_subject \ - -notif_text $notif_text - + -type_id [notification::type::get_type_id -short_name $notif_type] \ + -object_id $package_id \ + -response_id $response_id \ + -notif_subject $notif_subject \ + -notif_text $notif_text \ + -subset $subset \ + -action_id $response_id } ad_proc -public evaluation::package_key {} {