Index: openacs-4/packages/xowiki/tcl/template-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/Attic/template-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/xowiki/tcl/template-procs.tcl	23 Sep 2006 10:39:05 -0000	1.1
+++ openacs-4/packages/xowiki/tcl/template-procs.tcl	11 Oct 2007 07:48:00 -0000	1.2
@@ -41,7 +41,7 @@
   # set the stack frame at which the template is being parsed so that
   # other procedures can reference variables cleanly
   variable parse_level
-  lappend parse_level [expr [info level] - $uplevel]
+  lappend parse_level [expr {[info level] - $uplevel}]
 
   set __adp_out [template::adp_parse [template::util::url_to_file $src] $varlist]