Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v diff -u -r1.37 -r1.38 --- openacs-4/packages/xowiki/tcl/includelet-procs.tcl 9 May 2008 21:15:39 -0000 1.37 +++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl 9 May 2008 21:35:08 -0000 1.38 @@ -2739,12 +2739,12 @@ # Compute filter clauses # set init_vars [list] - array set uc {tcl false h ""} + array set uc {tcl false h "" vars ""} if {[info exists unless]} { array set uc [::xowiki::FormPage filter_expression $unless ||] set init_vars [concat $init_vars $uc(vars)] } - array set wc {tcl true h ""} + array set wc {tcl true h "" vars ""} if {[info exists where]} { array set wc [::xowiki::FormPage filter_expression $where &&] set init_vars [concat $init_vars $wc(vars)]