Index: openacs-4/packages/lors/lib/course-structure.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lors/lib/course-structure.tcl,v diff -u -N -r1.16 -r1.17 --- openacs-4/packages/lors/lib/course-structure.tcl 24 Nov 2009 20:03:58 -0000 1.16 +++ openacs-4/packages/lors/lib/course-structure.tcl 16 Apr 2010 19:25:49 -0000 1.17 @@ -58,9 +58,8 @@ set instance [lorsm::get_course_name -manifest_id $man_id] # Folder - # This supports LORS Central but breaks lorsm so its commented out - # set root_folder [lorsm::get_root_folder_id] - # set folder_id [db_string get_folder_id { }] + set root_folder [lorsm::get_root_folder_id] + set folder_id [db_string get_folder_id { }] set folder [apm_package_url_from_id $fs_package_id]?[export_vars folder_id] } @@ -81,9 +80,6 @@ } -append orgs_list \ - "" - set pretty_types_map {} if { [apm_package_installed_p assessment] } { append pretty_types_map "as_sections Questions" @@ -136,14 +132,8 @@ set down [export_vars -base reorder-items {item_id {dir down} return_url}] } - append orgs_list "" - -} if_no_rows { - append orgs_list "" } -append orgs_list "
" - set enabler_url [export_vars -base enabler {man_id}] set tracker_url [export_vars -base tracker {man_id}] set sharer_url [export_vars -base sharer {man_id folder_id return_url}] @@ -194,5 +184,3 @@ } } } - -set rename_url [export_vars -base course-rename {man_id}]