Index: openacs-4/packages/acs-templating/resources/lists/table.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/resources/lists/table.adp,v diff -u -r1.1.2.1 -r1.1.2.2 --- openacs-4/packages/acs-templating/resources/lists/table.adp 2 Jul 2003 19:14:01 -0000 1.1.2.1 +++ openacs-4/packages/acs-templating/resources/lists/table.adp 10 Aug 2003 12:44:32 -0000 1.1.2.2 @@ -43,7 +43,7 @@ - +
Index: openacs-4/packages/acs-templating/tcl/list-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/list-procs.tcl,v diff -u -r1.1.2.5 -r1.1.2.6 --- openacs-4/packages/acs-templating/tcl/list-procs.tcl 10 Aug 2003 12:22:52 -0000 1.1.2.5 +++ openacs-4/packages/acs-templating/tcl/list-procs.tcl 10 Aug 2003 12:44:32 -0000 1.1.2.6 @@ -35,6 +35,7 @@ {-main_class "list"} {-sub_class ""} {-class ""} + {-html ""} {-page_size ""} {-page_groupsize 10} {-page_query ""} @@ -164,6 +165,9 @@ @param class Alternatively, you can specify the CSS class directly. If specified, this overrides main_class/sub_class. + @param html HTML attributes to be output for the table tag, e.g. { align right style "background-color: yellow;" }. + Value should be a Tcl list with { name value name value } + @param page_size The number of rows to display on each page. If specified, the list will be paginated. @param page_groupsize The page group size for the paginator. See template::paginator::create for more details. @@ -230,6 +234,7 @@ main_class {list} sub_class {} class {} + html {} actions {} bulk_actions {} bulk_action_export_vars {} @@ -277,6 +282,7 @@ main_class sub_class class + html page_size page_groupsize page_query @@ -762,6 +768,9 @@ } } + # Table tag HTML attributes + set list_properties(table_attributes) [template::list::util_html_to_attributes_string $list_properties(html)] + # # Find the list template #