Index: openacs-4/packages/acs-templating/tcl/element-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/element-procs.tcl,v
diff -u -r1.32.2.2 -r1.32.2.3
--- openacs-4/packages/acs-templating/tcl/element-procs.tcl	5 Sep 2013 11:38:46 -0000	1.32.2.2
+++ openacs-4/packages/acs-templating/tcl/element-procs.tcl	29 Sep 2013 18:49:59 -0000	1.32.2.3
@@ -726,7 +726,7 @@
 
     upvar #$level formgroup:$i formgroup
     
-    set option [lindex $options [expr {$i - 1}]]
+    set option [lindex $options $i-1]
     set value [lindex $option 1]
 
     if { ![info exists values($value)] } {