Index: openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl,v
diff -u -r1.150 -r1.151
--- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	4 Jul 2008 10:57:45 -0000	1.150
+++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	4 Jul 2008 11:38:32 -0000	1.151
@@ -501,7 +501,6 @@
           set hleft [my h_double_quote $lhs]
           set tleft "\$__ia($lhs)"
           lappend vars $lhs ""
-          set op eq
           foreach p [split $rhs_expr |] {
             lappend tcl_clause "$tleft $tcl_op($op) {$p}"
             lappend h_clause "$hleft=>[my h_double_quote $p]"