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
 }
 
Index: openacs-4/packages/imsld-portlet/www/imsld-portlet.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld-portlet/www/imsld-portlet.adp,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/imsld-portlet/www/imsld-portlet.adp	27 Sep 2005 11:22:47 -0000	1.1
+++ openacs-4/packages/imsld-portlet/www/imsld-portlet.adp	5 Oct 2005 14:14:03 -0000	1.2
@@ -1,13 +1,21 @@
 <if @shaded_p@ false>
-<if @one_instance_p@ true>
-   <include src="/packages/lorsm/lib/user-lorsm" package_id="@list_of_package_ids@" />
-</if>
-<else>
 
-<list name="list_of_package_ids">
-  <include src="/packages/lorsm/lib/user-lorsm" package_id="@list_of_package_ids:item@" />
-</list>
-
+<if @community_id@ not nil>
+ <if @imslds_in_class:rowcount@ gt 0>
+  <blockquote>
+  <multiple name="imslds_in_class">
+  <li><strong>@imslds_in_class.imsld_title@</strong><br />
+      <include src="../../imsld/lib/imsld-chunk" imsld_item_id="@imslds_in_class.imsld_id@"> 
+  <br /><br />
+  </multiple>
+  </blockquote>
+ </if>
+ <else>
+  <# There are no units of learning for this course. #>
+ </else>
+ </if>
+<else>
+not implemented
 </else>
 
 </if>
Index: openacs-4/packages/imsld-portlet/www/imsld-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld-portlet/www/imsld-portlet.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/imsld-portlet/www/imsld-portlet.tcl	27 Sep 2005 11:22:47 -0000	1.1
+++ openacs-4/packages/imsld-portlet/www/imsld-portlet.tcl	5 Oct 2005 14:14:03 -0000	1.2
@@ -15,4 +15,27 @@
 set list_of_package_ids [lsort $config(package_id)]
 set one_instance_p [ad_decode [llength $list_of_package_ids] 1 1 0]
 
+set community_id [dotlrn_community::get_community_id]
+
+if { ![empty_string_p $community_id] } {
+    # were are inside a community 
+    db_multirow imslds_in_class get_manifests {
+        select cr3.item_id as imsld_id,
+        coalesce(imsld.title, imsld.identifier) as imsld_title
+        from acs_rels ar, cr_items cr1, cr_items cr2, cr_items cr3, imsld_cp_manifests icm, imsld_cp_organizations ico, imsld_imsldsi imsld 
+        where ar.object_id_one = :community_id
+        and ar.rel_type = 'imsld_community_manifest_rel'
+        and ar.object_id_two = cr1.item_id
+        and cr1.live_revision = icm.manifest_id
+        and ico.manifest_id = cr1.item_id
+        and imsld.organization_id = cr2.item_id
+        and cr2.live_revision = ico.organization_id
+        and cr3.live_revision = imsld.imsld_id
+    } {
+        ns_log notice "vamos!!!!! \n"
+    }
+} else {
+    # not implemented!
+}
+
 ad_return_template