Index: openacs-4/packages/dotlrn-imsld/tcl/dotlrn-imsld-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-imsld/tcl/dotlrn-imsld-procs.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn-imsld/tcl/dotlrn-imsld-procs.tcl 26 Sep 2005 22:26:11 -0000 1.1 +++ openacs-4/packages/dotlrn-imsld/tcl/dotlrn-imsld-procs.tcl 5 Oct 2005 14:14:53 -0000 1.2 @@ -69,6 +69,14 @@ ns_set put $args package_id $package_id add_portlet_helper $portal_id $args + # intializate rels, only if they are not initialized yet (a previous + # call when istantiating the applet in another community) + if { ![plsql_utility::object_type_exists_p imsld_community_manifest_rel] } { + rel_types::new imsld_community_manifest_rel "dotLRN Community - IMS LD Manifests rel" "dotLRN Community - IMS LD Manifests rels" \ + [acs_object::get_element -object_id $community_id -element object_type] 0 {} \ + content_item 0 {} + } + return $package_id }