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.8 -r1.9
--- openacs-4/packages/acs-templating/tcl/tag-procs.tcl	23 Aug 2003 00:26:26 -0000	1.8
+++ openacs-4/packages/acs-templating/tcl/tag-procs.tcl	28 Aug 2003 09:41:45 -0000	1.9
@@ -156,11 +156,16 @@
     }
 
     nil {
-      # substitute array variables
-      regsub {^"@([a-zA-z0-9_]+)\.([a-zA-z0-9_]+)@"$} $arg1 {\1(\2)} arg1
-      # substitute regular variables
-      regsub {^"@([a-zA-z0-9_:]+)@"$} $arg1 {\1} arg1
-      append condition "\[template::util::is_nil $arg1\]"
+      if { [string first @ $arg1] == -1 } {
+        # We're assuming this is a static string, not a variable
+        append condition "\[empty_string_p $arg1\]"
+      } else {
+        # substitute array variables
+        regsub {^"@([a-zA-z0-9_]+)\.([a-zA-z0-9_]+)@"$} $arg1 {\1(\2)} arg1
+        # substitute regular variables
+        regsub {^"@([a-zA-z0-9_:]+)@"$} $arg1 {\1} arg1
+        append condition "\[template::util::is_nil $arg1\]"
+      }
       set next $i
     }