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 " |
"
}