Index: openacs-4/packages/acs-templating/tcl/util-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/util-procs.tcl,v
diff -u -r1.8.2.1 -r1.8.2.2
--- openacs-4/packages/acs-templating/tcl/util-procs.tcl	14 Jan 2003 00:42:02 -0000	1.8.2.1
+++ openacs-4/packages/acs-templating/tcl/util-procs.tcl	19 Mar 2003 03:18:39 -0000	1.8.2.2
@@ -688,7 +688,7 @@
 } {
 
   set ret [list]
-  for {set i $start_at} { $i <= $ret } {incr i} {
+  for {set i $start_at} { $i <= $last_number } {incr i} {
     lappend ret $i
   }
   return $ret