Index: openacs-4/contrib/packages/project-manager/www/one.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/one.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/contrib/packages/project-manager/www/one.tcl	30 Jul 2003 20:42:05 -0000	1.3
+++ openacs-4/contrib/packages/project-manager/www/one.tcl	31 Jul 2003 20:11:41 -0000	1.4
@@ -32,12 +32,26 @@
     planned_end_date:onevalue
     ongoing_p:onevalue
     tasks:multirow
+    write_p:onevalue
+    create_p:onevalue
 }
 
 # --------------------------------------------------------------- #
 
+# set up context bar
 set context_bar [ad_context_bar "View"]
 
+# the unique identifier for this package
+set package_id [ad_conn package_id]
+set user_id    [ad_maybe_redirect_for_registration]
+
+# permissions
+permission::require_permission -party_id $user_id -object_id $package_id -privilege read
+
+set write_p  [permission::permission_p -object_id $package_id -privilege write] 
+set create_p [permission::permission_p -object_id $package_id -privilege create]
+
+
 db_multirow tasks project_tasks_query { }
 
 db_1row project_query {	}