Index: openacs-4/packages/workflow/tcl/action-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/action-procs.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/workflow/tcl/action-procs.tcl	17 Dec 2003 16:13:54 -0000	1.19
+++ openacs-4/packages/workflow/tcl/action-procs.tcl	7 Jan 2004 13:41:27 -0000	1.20
@@ -418,7 +418,7 @@
     @param action_id The action_id of the action.
     @return role_id of the assigned role.
 } {
-    return [get_from_request_cache $action_id "assigned_role"]
+    return [get_from_request_cache $action_id "assigned_role_id"]
 }
 
 ad_proc -public workflow::action::get_allowed_roles {
Index: openacs-4/packages/workflow/tcl/case-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/tcl/case-procs.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/workflow/tcl/case-procs.tcl	5 Jan 2004 12:20:20 -0000	1.19
+++ openacs-4/packages/workflow/tcl/case-procs.tcl	7 Jan 2004 13:41:27 -0000	1.20
@@ -1241,14 +1241,14 @@
 
     set object_id [workflow::case::get_element -case_id $case_id -element object_id]
     set user_role_ids [workflow::case::get_user_roles -case_id $case_id -user_id $user_id]
-    
+
     set permission_p 0
 
     foreach role_id $user_role_ids {
 
         # Is this an assigned role for this action?
-        set assigned_role [workflow::action::get_assigned_role -action_id $action_id]
-        if { $assigned_role == $role_id } {
+        set assigned_role_id [workflow::action::get_assigned_role -action_id $action_id]
+        if { $assigned_role_id == $role_id } {
             set permission_p 1
             break
         }