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.13 -r1.14
--- openacs-4/packages/acs-templating/tcl/tag-procs.tcl	27 Feb 2005 22:45:40 -0000	1.13
+++ openacs-4/packages/acs-templating/tcl/tag-procs.tcl	16 Mar 2005 19:19:17 -0000	1.14
@@ -143,7 +143,7 @@
     }
 
     in { 
-      set expr [join [lrange $args $i end] "|"]
+      set expr "^([join [lrange $args $i end] "|"])\$"
       append condition "\[regexp \"$expr\" $arg1\] " 
       set next [llength $args]
     }