Index: openacs-4/packages/acs-templating/www/admin/test/include.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/www/admin/test/include.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-templating/www/admin/test/include.tcl	31 Jan 2005 21:03:19 -0000	1.2
+++ openacs-4/packages/acs-templating/www/admin/test/include.tcl	10 Jan 2007 21:22:13 -0000	1.3
@@ -1,4 +1,4 @@
-if [llength $l] {
+if {[llength $l]} {
     set car		[lindex $l 0]
     set cdr		[lrange $l 1 end]