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.3 -r1.1.2.4 --- openacs-4/packages/acs-templating/tcl/list-procs.tcl 9 Jul 2003 14:15:58 -0000 1.1.2.3 +++ openacs-4/packages/acs-templating/tcl/list-procs.tcl 10 Jul 2003 13:03:40 -0000 1.1.2.4 @@ -1267,7 +1267,7 @@ if { [string equal $style {}] } { set style [parameter::get \ -package_id [apm_package_id_from_key "acs-templating"] \ - -parameter DefaultListStyle \ + -parameter DefaultListFilterStyle \ -default "filters"] } set file_stub "[template::get_resource_path]/lists/$style" @@ -1730,6 +1730,18 @@
@@ -1772,17 +1784,17 @@ values {} has_default_p 0 default_value {} + where_clause {} + where_clause_eval {} + other_label {} } # Prepopulate some automatically generated values array set filter_properties { clear_url {} urls {} add_urls {} - other_label {} selected_p {} - where_clause {} - where_clause_eval {} } # Let the filter know its own name