Index: openacs-4/packages/imsld/www/admin/imsld-view-roles.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/imsld-view-roles.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/imsld/www/admin/imsld-view-roles.tcl	26 Apr 2018 08:56:38 -0000	1.7
+++ openacs-4/packages/imsld/www/admin/imsld-view-roles.tcl	9 May 2018 15:33:31 -0000	1.8
@@ -27,7 +27,7 @@
 set page_title "[_ imsld.View_Roles]"
 set context [list $page_title]
 
-set lista {}
+set lista [list]
 lappend lista [list "[_ imsld.Select_a_role]..." 0]
 
 for {set order 0} {$order < [llength $roles_list] } {incr order} {