Index: openacs-4/packages/acs-templating/tcl/query-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/query-procs.tcl,v
diff -u -N -r1.33 -r1.34
--- openacs-4/packages/acs-templating/tcl/query-procs.tcl	3 Dec 2012 09:44:55 -0000	1.33
+++ openacs-4/packages/acs-templating/tcl/query-procs.tcl	27 Oct 2014 16:40:12 -0000	1.34
@@ -352,7 +352,7 @@
       lappend group_values [ns_set get $row $group]
     }
 
-    eval template::util::lnest rows [list $values] $group_values
+    template::util::lnest rows $values {*}$group_values
   }
 
   if { [info exists opts(cache)] } {
@@ -978,7 +978,7 @@
             lappend sort_list [list $i $sortby]
         }
 
-        set sort_list [eval lsort $sort_args -index 1 [list $sort_list]]
+        set sort_list [lsort {*}$sort_args -index 1 $sort_list]
 
         
         # Now we have a list with two elms, (rownum, sort-by-value), sorted by sort-by-value