Index: openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl,v diff -u -N -r1.63.4.6 -r1.63.4.7 --- openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl 20 Aug 2007 13:41:07 -0000 1.63.4.6 +++ openacs-4/packages/imsld/tcl/imsld-parse-procs.tcl 14 Nov 2007 18:53:33 -0000 1.63.4.7 @@ -1954,7 +1954,9 @@ # an error happened, abort and return the list whit the error return $item_list } - + if { ![info exist role_id] } { + set role_id ""; + } # create the monitor service set monitor_service_id [imsld::item_revision_new -attributes [list [list service_id $service_id] \ [list role_id $role_id] \