Index: openacs-4/packages/search/tcl/search-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/search/tcl/search-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/search/tcl/search-procs.tcl	16 Sep 2001 10:18:44 -0000	1.3
+++ openacs-4/packages/search/tcl/search-procs.tcl	16 Sep 2001 19:20:50 -0000	1.4
@@ -9,7 +9,7 @@
 	from search_observer_queue
 	order by date asc
     } {
-	
+
 	switch $event {
 	    INSERT {
 		set object_type [db_exec_plsql get_object_type "select acs_object_util__get_object_type($object_id)"]
@@ -54,6 +54,8 @@
 } {
     upvar $_txt txt
 
+    set txt ""
+
     switch $storage_type {
 	text {
 	    set data $content
@@ -62,7 +64,7 @@
 	    set data [db_blob_get data "select '$content' as content, 'file' as storage_type"]
 	}
 	lob {
-	    set data [db_blob_get data "select '$content' as content, 'lob' as storage_type"]
+	    set data [db_blob_get data "select $content as content, 'lob' as storage_type"]
 	}
     }