Index: openacs-4/packages/tsearch2-driver/tcl/test/tsearch2-driver-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/tsearch2-driver/tcl/test/tsearch2-driver-procs.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/tsearch2-driver/tcl/test/tsearch2-driver-procs.tcl 13 Nov 2006 01:10:33 -0000 1.3 +++ openacs-4/packages/tsearch2-driver/tcl/test/tsearch2-driver-procs.tcl 13 Nov 2006 04:06:13 -0000 1.4 @@ -47,5 +47,9 @@ aa_true "Or at beginning by itself" \ [string equal "else" \ [tsearch2::build_query -query $q]] + set q "not" + aa_true "Not all alone" \ + [string equal "" \ + [tsearch2::build_query -query $q]] } }