Index: openacs-4/packages/imsld/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/index.tcl,v
diff -u -r1.14 -r1.15
--- openacs-4/packages/imsld/www/index.tcl	4 Apr 2006 10:26:04 -0000	1.14
+++ openacs-4/packages/imsld/www/index.tcl	19 Apr 2006 16:29:20 -0000	1.15
@@ -1,30 +1,9 @@
 ad_page_contract {
+} {
+    {orderby ""}
 }
 
 set page_title {#imsld.units-of-learning#}
 set context {}
 
-template::list::create \
-    -name imslds \
-    -multirow imslds \
-    -key imsld_id \
-    -elements {
-        imsld_title {
-            label "[_ imsld.IMS_LD_Name]"
-            orderby_asc {imsld_title asc}
-            orderby_desc {imsld_title desc}
-	    display_template {<a href="imsld-frameset?imsld_id=@imslds.imsld_id@">@imslds.imsld_title@</a>}
-        }
-    }
-
-set orderby [template::list::orderby_clause -orderby -name imslds]
-
-if {[string equal $orderby ""]} {
-    set orderby " order by imsld_title asc"
-}
-
 set community_id [dotlrn_community::get_community_id]
-set cr_root_folder_id [imsld::cr::get_root_folder -community_id $community_id]
-
-db_multirow imslds get_manifests { *SQL* } {
-}