Index: openacs-4/packages/imsld/tcl/imsld-runtime-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-runtime-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/imsld/tcl/imsld-runtime-procs.tcl	5 Jul 2006 23:24:23 -0000	1.5
+++ openacs-4/packages/imsld/tcl/imsld-runtime-procs.tcl	6 Jul 2006 10:19:27 -0000	1.6
@@ -217,6 +217,7 @@
         }
     }
 
+    set role_instance_id ""
     if { ![string eq $role_id ""] } {
         # find the role instance which the user belongs to
         set role_instance_id [imsld::roles::get_user_role_instance -run_id $run_id -role_id $role_id -user_id $user_id]