Index: openacs-4/packages/acs-templating/tcl/parse-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/parse-procs.tcl,v
diff -u -N -r1.55.2.4 -r1.55.2.5
--- openacs-4/packages/acs-templating/tcl/parse-procs.tcl	3 Oct 2016 18:52:07 -0000	1.55.2.4
+++ openacs-4/packages/acs-templating/tcl/parse-procs.tcl	27 Nov 2016 12:19:35 -0000	1.55.2.5
@@ -510,7 +510,7 @@
     # avoid substituting when it is a percentage attribute to an HTML tag.
     regsub -all {([^0-9])%>} $chunk {\1</tcl>} chunk
     # warn about the first ambiguity in the source
-    if [regexp {[0-9]+%>} $chunk match] {
+    if {[regexp {[0-9]+%>} $chunk match]} {
         ns_log warning "ambiguous '$match'; write Tcl escapes with a space like\
       <% set x 50 %> and HTML tags with proper quoting, like <hr width=\"50%\">\
       when compiling ADP source: template::adp_compile $source_type {$source}"