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.3 -r1.4 --- openacs-4/packages/imsld-portlet/www/imsld-portlet.adp 6 Oct 2005 10:25:01 -0000 1.3 +++ openacs-4/packages/imsld-portlet/www/imsld-portlet.adp 19 Apr 2006 16:31:05 -0000 1.4 @@ -1,19 +1,8 @@ - -
- -
  • @imslds_in_class.imsld_title@
    - -

    - -
  • +
    - - #imsld-portlet.There_are_no_units-of-learning_for_this_course#. - -
    not implemented 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.5 -r1.6 --- openacs-4/packages/imsld-portlet/www/imsld-portlet.tcl 12 Dec 2005 17:49:57 -0000 1.5 +++ openacs-4/packages/imsld-portlet/www/imsld-portlet.tcl 19 Apr 2006 16:31:05 -0000 1.6 @@ -6,7 +6,8 @@ @creation-date 2005-09-27 @cvs-id $Id$ -} -query { +} { + {orderby ""} } array set config $cf @@ -16,27 +17,3 @@ 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 - set cr_root_folder_id [imsld::cr::get_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 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 - } { - } -} else { - # not implemented! -} - -ad_return_template