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 -N -r1.1.2.9 -r1.1.2.10
--- openacs-4/packages/acs-templating/tcl/list-procs.tcl	10 Aug 2003 13:22:32 -0000	1.1.2.9
+++ openacs-4/packages/acs-templating/tcl/list-procs.tcl	19 Aug 2003 12:45:11 -0000	1.1.2.10
@@ -831,19 +831,24 @@
 ad_proc -private template::list::prepare_for_rendering {
     {-name:required}
 } {
-    set level [template::adp_level]
+    set __level [template::adp_level]
 
     # Provide a reference to the list properties for use by the list template
     # This one is named __list_properties to avoid getting scrambled by below multirow
     get_reference -name $name -local_name __list_properties
 
+    # Upvar other variables passed in through the pass_properties property
+    foreach var $__list_properties(pass_properties) {
+        upvar #$__level $var $var
+    }
+
     #
     # Dynamic columns: display_eval, link_url_eval, aggregate
     #
 
     if { $__list_properties(dynamic_cols_p) || $__list_properties(aggregates_p) } {
         foreach element_ref $__list_properties(element_refs) {
-            upvar #$level $element_ref element_properties
+            upvar #$__level $element_ref element_properties
             
             # display_eval, link_url_eval
             foreach eval_property { display link_url } {
@@ -883,7 +888,7 @@
         template::multirow foreach $__list_properties(multirow) {
 
             foreach element_ref $__list_properties(element_refs) {
-                upvar #$level $element_ref __element_properties
+                upvar #$__level $element_ref __element_properties
                 
                 # display_eval, link_url_eval
                 foreach eval_property { display link_url } {