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 -r1.5 -r1.6 --- openacs-4/packages/lors/lib/course-structure.tcl 12 Jul 2006 06:05:27 -0000 1.5 +++ openacs-4/packages/lors/lib/course-structure.tcl 20 Dec 2006 22:45:08 -0000 1.6 @@ -121,33 +121,7 @@ ns_log notice "AFTER MULTIROW [template::multirow size blah]" append orgs_list "" - #"$org_title$hasmetadata" - set indent [expr $indent +1] -# set indent [expr $indent +1] -# set missing_text "[_ lorsm.Nothing_here]" -# set return_url [export_vars -base [ns_conn url] man_id] -# set table_extra_html { width="100%" } -# set table_extra_vars {return_url indent_array lorsm_p} -# set table_def { -# { title "\#lorsm.Item_Name\#" "no_sort" " -# [set indent \"\" -# for { set i 0 } { $i < [expr $indent_array($item_id)-1]} { incr i } { -# append indent \"      \" -# } -# if {$type eq \"webcontent\" && ![string equal $identifierref {}]} {set href \"$indent$item_title\"} else {set href \"$item_title\"}]" } -# { type "\#lorsm.Type\#" "no_sort" "$type" } -# { delete "\#acs-kernel.common_Delete\#" "no_sort" "Delete" } -# { move_up "Move Up" "no_sort" "Move Up" } -# { move_down "Move Down" "no_sort" "Move Down" } -# } -# set table_item [ad_table -Tmissing_text $missing_text -Textra_vars $table_extra_vars -Theader_row_extra "style=\"background-color: #e0e0e0; font-weight: bold;\" class=\"list-header\"" -Ttable_extra_html $table_extra_html blah { } $table_def] - -# append orgs_list "$table_item" - - -# append orgs_list "" - } if_no_rows { append orgs_list "" }