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.7 -r1.8
--- openacs-4/packages/evaluation/www/admin/index.tcl	14 Jul 2004 17:42:07 -0000	1.7
+++ openacs-4/packages/evaluation/www/admin/index.tcl	26 Jul 2004 18:01:43 -0000	1.8
@@ -17,11 +17,6 @@
 set page_title "[_ evaluation.Evaluation_Index_]"
 set context {}
 
-#set portal_id [dotlrn_community::get_portal_id -community_id [dotlrn_community::get_community_id]]
-#set page_id [portal::get_page_id -create -portal_id $portal_id -page_name ""]
-#set layout_id [portal::get_layout_id -page_id $page_id $portal_id]
-set ds_id [portal::get_datasource_id evaluation_admin_portlet]
-
 set package_id [ad_conn package_id]
 set user_id [ad_conn user_id]
 set admin_p [permission::permission_p -party_id $user_id -object_id $package_id -privilege admin]