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.26 -r1.27
--- openacs-4/packages/acs-templating/tcl/list-procs.tcl	25 Apr 2005 13:29:19 -0000	1.26
+++ openacs-4/packages/acs-templating/tcl/list-procs.tcl	9 Aug 2005 23:20:05 -0000	1.27
@@ -557,7 +557,7 @@
 
         # We need this uplevel so that the bind variables in the query will get bound at the caller's level
         uplevel $ulevel [list template::paginator create \
-                             --foo--bar-- \
+							 $list_properties(page_query_name) \
                              $list_properties(paginator_name) \
                              $list_properties(page_query_substed) \
                              -pagesize $list_properties(page_size) \