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.2.2.1 -r1.2.2.2 --- openacs-4/packages/tsearch2-driver/tcl/test/tsearch2-driver-procs.tcl 13 Nov 2006 01:05:09 -0000 1.2.2.1 +++ openacs-4/packages/tsearch2-driver/tcl/test/tsearch2-driver-procs.tcl 13 Nov 2006 04:04:16 -0000 1.2.2.2 @@ -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]] } }