Index: openacs-4/packages/imsld/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/index.tcl,v
diff -u -r1.9 -r1.10
--- openacs-4/packages/imsld/www/index.tcl	25 Nov 2005 08:58:56 -0000	1.9
+++ openacs-4/packages/imsld/www/index.tcl	9 Dec 2005 12:01:31 -0000	1.10
@@ -5,16 +5,19 @@
 set context {}
 set community_id [dotlrn_community::get_community_id]
 
+set cr_root_folder_id [imsld::cr::ger_root_folder -community_id $community_id]
+
 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
+    from cr_items cr1, cr_items cr2, cr_items cr3, cr_items cr4,
+    imsld_cp_manifests icm, imsld_cp_organizations ico, imsld_imsldsi imsld 
+    where cr1.live_revision = icm.manifest_id
+    and cr1.parent_id = cr4.item_id
+    and cr4.parent_id = :cr_root_folder_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
+} {
 }