Index: openacs-4/packages/simulation/lib/case-history.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/lib/case-history.tcl,v
diff -u -N -r1.2 -r1.2.2.1
--- openacs-4/packages/simulation/lib/case-history.tcl	12 Mar 2004 15:49:43 -0000	1.2
+++ openacs-4/packages/simulation/lib/case-history.tcl	16 Mar 2004 16:16:18 -0000	1.2.2.1
@@ -25,7 +25,7 @@
         }
         user_name {
             label "User"
-            link_url_eval {[acs_community_member_url -user_id $creation_user]}
+            link_url_eval {[ad_decode $creation_user "" "" [acs_community_member_url -user_id $creation_user]]}
         }
         action_pretty {
             label "Task"
@@ -56,13 +56,11 @@
     from   workflow_case_log l join 
            workflow_actions a using (action_id) join 
            cr_items i on (i.item_id = l.entry_id) join 
-           acs_objects io on (io.object_id = i.item_id) join 
-           cc_users iou on (iou.user_id = io.creation_user) join
-           cr_revisions r on (r.revision_id = i.live_revision),
-           workflow_roles role
+           acs_objects io on (io.object_id = i.item_id) left outer join 
+           acs_users_all iou on (iou.user_id = io.creation_user) join
+           cr_revisions r on (r.revision_id = i.live_revision) left outer join
+           workflow_roles role on (role.role_id = a.assigned_role)
     where  l.case_id = :case_id
-    and    role.role_id = a.assigned_role
-    and    a.trigger_type = 'user'
     order  by io.creation_date
 } {
     if { ![empty_string_p $message_item_id] } {
@@ -72,6 +70,10 @@
     } else {
         set action_url {}
     }
+
+    if { [empty_string_p $creation_user] } {
+        set user_name "Timeout"
+    }
 }
 
 template::list::create \