Index: openacs-4/packages/workflow/www/admin/action-ae.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/www/admin/action-ae.adp,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/workflow/www/admin/action-ae.adp 11 Apr 2010 00:52:53 -0000 1.3
+++ openacs-4/packages/workflow/www/admin/action-ae.adp 14 Mar 2011 20:05:45 -0000 1.4
@@ -59,6 +59,7 @@
Assigned Role: | |
+ Allowed Roles: | |
Privileges: | |
Index: openacs-4/packages/workflow/www/admin/action-ae.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/www/admin/action-ae.tcl,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/workflow/www/admin/action-ae.tcl 11 Apr 2010 00:52:53 -0000 1.3
+++ openacs-4/packages/workflow/www/admin/action-ae.tcl 14 Mar 2011 20:05:45 -0000 1.4
@@ -30,8 +30,8 @@
[list "parallel" "parallel"] \
]
-set role_options [workflow::role::get_options -workflow_id $workflow_id]
-set role_options [linsert $role_options 0 [list "" ""]]
+set role_options_no_blank [workflow::role::get_options -workflow_id $workflow_id]
+set role_options [linsert $role_options_no_blank 0 [list "" ""]]
set privilege_options {{read read} {write write} {admin admin}}
ad_form -name "add_edit" -form {
@@ -48,6 +48,7 @@
{enabled_states:text(checkbox),multiple,optional {label {Enabled States:}} {options $state_options}}
{assigned_states:text(checkbox),multiple,optional {label {Assigned States:}} {options $state_options}}
{assigned_role:text(select),optional {label {Assigned Role:}} {options $role_options}}
+ {allowed_roles:text(multiselect),multiple,optional {label {Allowed Roles:}} {options $role_options_no_blank}}
{privileges:text(multiselect),multiple,optional {label {Privileges:}} {options $privilege_options}}
{sub:text(submit) {label {Submit}}}
} -new_data {
@@ -66,6 +67,7 @@
set update_array(new_state_id) $new_state_id
set update_array(assigned_role) $assigned_role
+ set update_array(allowed_roles) $allowed_roles
set update_array(privileges) $privileges
#callbacks
@@ -109,6 +111,7 @@
set update_array(new_state_id) $new_state_id
set update_array(assigned_role) $assigned_role
+ set update_array(allowed_roles) $allowed_roles
set update_array(privileges) $privileges
#callbacks
@@ -158,6 +161,7 @@
set callbacks [join $action_info(callbacks) "\n"]
set assigned_role $action_info(assigned_role)
+ set allowed_roles $action_info(allowed_roles)
set privileges $action_info(privileges)
} -after_submit {