Index: openacs-4/packages/lorsm/www/shared/course-info.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/shared/Attic/course-info.tcl,v diff -u -r1.4.4.1 -r1.4.4.2 --- openacs-4/packages/lorsm/www/shared/course-info.tcl 5 Dec 2006 10:49:45 -0000 1.4.4.1 +++ openacs-4/packages/lorsm/www/shared/course-info.tcl 21 Dec 2006 08:24:12 -0000 1.4.4.2 @@ -88,7 +88,9 @@ " db_foreach organizations {} { + set total_items [db_string items_count {select count(*) from ims_cp_items where org_id=:org_id} -default 0] + append orgs_list "$org_title$hasmetadata" set indent [expr $indent +1] @@ -99,16 +101,18 @@ set track_id 0 set table_extra_vars {return_url fs_local_package_id track_id} set table_def { - { title "" "no_sort" "$indent[if {![empty_string_p $identifierref]} {set href \"$item_title\"} else {set href $item_title}]" } - { metadata "Metadata?" "no_sort" "[if {$hasmetadata == \"f\"} {set hasmetadata \"No\"} else {set hasmetadata \"Metadata\"}]" } - { type "Type" "no_sort" "$type" } + { title "\#lorsm.Item_Name\#" "no_sort" " + [set indent \"\" + for { set i 0 } { $i < [expr $indent -1]} { incr i } { + append indent \"      \" + } + if {![empty_string_p $identifierref]} {set href \"$item_title\"} else {set href $item_title}]" } + { metadata "\#lorsm.Metadata_1\#" "no_sort" "[if {$hasmetadata == \"f\"} {set hasmetadata \"No\"} else {set hasmetadata \"Metadata\"}]" } + { type "\#lorsm.Type\#" "no_sort" "$type" } } - 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 { - + 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] - } $table_def] - append orgs_list "$table_item"