Index: openacs-4/packages/openfts-driver/tcl/openfts-driver-init.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/openfts-driver/tcl/openfts-driver-init.tcl,v
diff -u -N -r1.1 -r1.1.4.1
--- openacs-4/packages/openfts-driver/tcl/openfts-driver-init.tcl	1 Sep 2001 20:33:52 -0000	1.1
+++ openacs-4/packages/openfts-driver/tcl/openfts-driver-init.tcl	12 Nov 2002 17:55:45 -0000	1.1.4.1
@@ -9,8 +9,8 @@
    if { [llength $files] == 0 } {
        error "Unable to locate $openfts_tcl_src_path."
    }
-
+   ns_log Notice "sourcing files from ${openfts_tcl_src_path}"
    foreach file [lsort $files] {
       source $file
    }
-}
\ No newline at end of file
+}
Index: openacs-4/packages/openfts-driver/tcl/openfts-driver-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/openfts-driver/tcl/openfts-driver-procs.tcl,v
diff -u -N -r1.4.2.2 -r1.4.2.3
--- openacs-4/packages/openfts-driver/tcl/openfts-driver-procs.tcl	10 Oct 2002 17:01:32 -0000	1.4.2.2
+++ openacs-4/packages/openfts-driver/tcl/openfts-driver-procs.tcl	12 Nov 2002 17:55:45 -0000	1.4.2.3
@@ -32,6 +32,7 @@
 
     foreach {out condition order} [Search::OpenFTS::get_sql self $query opt] break
 
+    set result(stopwords) $opt(rejected)
     if { ![string length $condition] } {
         return [array get result]
     }
@@ -79,7 +80,6 @@
         limit $limit
         offset $offset"
 
-    set result(stopwords) $opt(rejected)
     set result(count) [db_exec_plsql sql_count $sql_count]
     if { $result(count) > 0} { 
 	db_foreach sql_sort $sql_sort {lappend result(ids) $object_id}