Index: openacs-4/contrib/obsolete-packages/acs-workflow/www/admin/attributes.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/acs-workflow/www/admin/attributes.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/contrib/obsolete-packages/acs-workflow/www/admin/attributes.tcl 13 Mar 2001 22:59:27 -0000 1.1 +++ openacs-4/contrib/obsolete-packages/acs-workflow/www/admin/attributes.tcl 19 Nov 2001 18:29:28 -0000 1.2 @@ -1,5 +1,5 @@ ad_page_contract { - Manage workflow task panels. + Manage workflow attributes. @author Lars Pind (lars@pinds.com) @creation-date December 15, 2000 @@ -17,8 +17,6 @@ } -properties { workflow_key context_bar - attributes:multirow - add_url } db_1row workflow_name { @@ -29,25 +27,6 @@ set context_bar [ad_context_bar [list "workflow?[export_url_vars workflow_key]" "$workflow_name"] "Attributes"] -db_multirow attributes attributes { - select a.attribute_id, - a.sort_order, - a.attribute_name, - a.pretty_name, - a.datatype, - '' as delete_url, - (select count(*) from wf_transition_attribute_map m - where m.workflow_key = a.object_type - and m.attribute_id = a.attribute_id) as used_p - from acs_attributes a - where a.object_type = :workflow_key - order by sort_order -} { - set delete_url "attribute-delete?[export_vars -url {workflow_key attribute_id}]" -} - -set add_url "attribute-add?[export_vars -url {workflow_key}]" - ad_return_template