Index: openacs-4/packages/evaluation/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/index.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/evaluation/www/admin/index.tcl	14 May 2004 23:38:43 -0000	1.2
+++ openacs-4/packages/evaluation/www/admin/index.tcl	19 May 2004 17:33:09 -0000	1.3
@@ -14,17 +14,25 @@
 set context {}
 
 set package_id [ad_conn package_id]
-# [permission::permission_p -party_id $user_id -object_id $package_id -privilege read]
+set user_id [ad_conn user_id]
+set admin_p [permission::permission_p -party_id $user_id -object_id $package_id -privilege admin]
 
 db_multirow grades get_grades { *SQL* } {
 	
 }
 
-set notification_chunk [notification::display::request_widget \
+set assignments_notification_chunk [notification::display::request_widget \
 							-type one_assignment_notif \
 							-object_id $package_id \
 							-pretty_name "Assignments" \
 							-url [ad_conn url] \
 						   ]
 
+set evaluations_notification_chunk [notification::display::request_widget \
+							-type one_evaluation_notif \
+							-object_id $package_id \
+							-pretty_name "Evaluations" \
+							-url [ad_conn url] \
+						   ]
+
 ad_return_template
\ No newline at end of file