Index: openacs-4/packages/logger/www/admin/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/logger/www/admin/index.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/logger/www/admin/index.tcl 7 Nov 2003 17:35:42 -0000 1.8
+++ openacs-4/packages/logger/www/admin/index.tcl 4 Jan 2004 17:24:38 -0000 1.9
@@ -21,6 +21,63 @@
#
###########
+
+template::list::create \
+ -name projects \
+ -no_data "No projects in this instance of logger." \
+ -actions {
+ "Create new project" project {}
+ } \
+ -elements {
+ edit {
+ link_url_col edit_url
+ display_template {
+
+ }
+ sub_class narrow
+ html { align center }
+ }
+ name {
+ label "Project Name"
+ link_url_col display_url
+ }
+ active_p {
+ label "Active"
+ display_template {
+ Yes (toggle)No (toggle)
+ }
+ html { align center }
+ }
+ project_lead {
+ label "Project Lead"
+ display_template {@projects.project_lead_chunk;noquote@}
+ }
+ permissions {
+ label "Permissions"
+ link_url_col permissions_url
+ display_template {Permissions}
+ sub_class narrow
+ html { align center }
+ }
+ unlink {
+ label "Unlink"
+ link_url_col unmap_url
+ display_template {Unlink}
+ sub_class narrow
+ html { align center }
+ }
+ delete {
+ sub_class narrow
+ display_template {
+
+
+
+ }
+ html { align center }
+ }
+ }
+
db_multirow -extend {
edit_url display_url permissions_url delete_url unmap_url project_lead_chunk
make_active_url make_inactive_url
@@ -43,6 +100,20 @@
#
#####
+template::list::create \
+ -name "mappable_projects" \
+ -elements {
+ name {
+ label "Project Name"
+ }
+ link {
+ label "Link in"
+ link_url_col map_url
+ html { align center }
+ display_template "Link to instance"
+ }
+ }
+
if { $user_id != 0 } {
db_multirow -extend { map_url } mappable_projects select_mappable_projects {} {
set map_url "project-instance-map?[export_vars { project_id }]"
@@ -58,12 +129,56 @@
#
###########
+template::list::create \
+ -name variables \
+ -actions {
+ "Create new variable" variable {}
+ } \
+ -elements {
+ edit {
+ link_url_col edit_url
+ display_template {
+
+ }
+ sub_class narrow
+ html { align center }
+ }
+ name {
+ label "Variable Name"
+ link_url_col edit_url
+ }
+ unit {
+ label "Unit"
+ }
+ type {
+ label "Additive"
+ display_template {
+ YesNo
+ }
+ }
+ permissions {
+ label "Permissions"
+ link_url_col permissions_url
+ display_template {Permissions}
+ sub_class narrow
+ html { align center }
+ }
+ delete {
+ sub_class narrow
+ display_template {
+
+
+
+ }
+ html { align center }
+ }
+ }
+
db_multirow -extend { edit_url delete_url permissions_url } variables select_variables {} {
set edit_url "variable?[export_vars { variable_id {formbutton\:formbuilder\:\:edit Edit} {form\:id variable_form} {form\:mode display}}]"
set delete_url "variable-delete?[export_vars { variable_id }]"
set permissions_url "${permissions_uri}?[export_vars {{object_id $variable_id} application_url}]"
}
set package_permissions_url "${permissions_uri}?[export_vars {{object_id $package_id} application_url}]"
-
-ad_return_template