Index: openacs-4/contrib/packages/project-manager/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/admin/Attic/index.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/contrib/packages/project-manager/www/admin/index.tcl	26 Jan 2004 15:39:40 -0000	1.3
+++ openacs-4/contrib/packages/project-manager/www/admin/index.tcl	3 Jun 2004 21:32:16 -0000	1.4
@@ -26,29 +26,43 @@
     task_term_lower:onevalue
     project_term:onevalue
     project_term_lower:onevalue
+    logger_link:onevalue
+    logger_primary_link:onevalue
 }
 
 # --------------------------------------------------------------- #
 
-# terminology
-set task_term       [parameter::get -parameter "TaskName" -default "Task"]
-set task_term_lower [parameter::get -parameter "taskname" -default "task"]
-set project_term    [parameter::get -parameter "ProjectName" -default "Project"]
-set project_term_lower [parameter::get -parameter "projectname" -default "project"]
+set logger_URLs [parameter::get -parameter "LoggerURLsToKeepUpToDate" -default ""]
+set logger_primary [parameter::get -parameter "LoggerPrimaryURL" -default ""]
 
 # set up context bar
 set context [list]
+set title "Project Manager Administration"
 
 # the unique identifier for this package
 set package_id [ad_conn package_id]
 set user_id    [ad_maybe_redirect_for_registration]
 
-# set up link to categories
+# set up links
 set categories_link "/categories/cadmin/one-object?object_id=$package_id"
+set parameters_link "/shared/parameters?package_id=$package_id&return_url=[site_node::get_package_url -package_key project-manager]admin/"
+set logger_link "logger"
+set logger_primary_link "logger-primary"
 
+if {[empty_string_p $logger_URLs]} {
+    set logger_warning "<font color=\"red\">not set up</font>"
+} else {
+    set logger_warning "Currently integrated: <ul><li>[join $logger_URLs "<li>"]</ul>"
+}
 
+if {[empty_string_p $logger_primary]} {
+    set logger_primary_warning "<font color=\"red\">not set up</font>"
+} else {
+    set logger_primary_warning "Currently selected: <ul><li>$logger_primary</ul>"
+}
+
 # permissions
-permission::require_permission -party_id $user_id -object_id $package_id -privilege read
+permission::require_permission -party_id $user_id -object_id $package_id -privilege admin
 
 set write_p  [permission::permission_p -object_id $package_id -privilege write] 
 set create_p [permission::permission_p -object_id $package_id -privilege create]