Index: openacs-4/packages/acs-templating/tcl/tag-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/tag-procs.tcl,v diff -u -r1.19 -r1.20 --- openacs-4/packages/acs-templating/tcl/tag-procs.tcl 27 Oct 2014 16:40:12 -0000 1.19 +++ openacs-4/packages/acs-templating/tcl/tag-procs.tcl 12 Jan 2015 09:41:40 -0000 1.20 @@ -117,13 +117,13 @@ if { $op eq "not" } { # - # Optimize common case "@arg@ no nil" + # Optimize common case "@arg@ not nil" # set op [lindex $args 2] set arg1 \"[lindex $args 0]\" if {$op eq "nil" && [string first @ $arg1] > -1} { set arg1 [template_tag_subst_reference $arg1] - append condition "\[info exists $arg1\] && \${$arg1} ne {}" + append condition "(\[info exists $arg1\] && \${$arg1} ne {})" set args [lrange $args 3 end] return } else { @@ -190,7 +190,7 @@ error "IF tag nil test uses string not variable for $arg1" } #append condition "\[template::util::is_nil $arg\]" - append condition "!\[info exists $arg\] || \${$arg} eq {}" + append condition "(!\[info exists $arg\] || \${$arg} eq {})" } set next $i }