Index: openacs-4/packages/imsld/www/admin/imsld-finish.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/imsld-finish.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/imsld/www/admin/imsld-finish.tcl 26 Apr 2018 08:56:38 -0000 1.9 +++ openacs-4/packages/imsld/www/admin/imsld-finish.tcl 9 May 2018 15:33:31 -0000 1.10 @@ -16,13 +16,13 @@ set roles_list_depth [imsld::roles::get_list_of_roles -imsld_id $imsld_id] -set roles_list {} +set roles_list [list] foreach role $roles_list_depth { lappend roles_list [lindex $role 0] } -set warnings {} -set errors {} +set warnings [list] +set errors [list] #para cada role, compruebo todas las condiciones foreach role $roles_list { set role_info [imsld::roles::get_role_info -role_id $role]