Index: openacs-4/packages/search/www/admin/index-missing-objects.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/search/www/admin/Attic/index-missing-objects.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/search/www/admin/index-missing-objects.tcl	8 Nov 2005 18:24:08 -0000	1.1
+++ openacs-4/packages/search/www/admin/index-missing-objects.tcl	10 Jan 2007 21:22:14 -0000	1.2
@@ -7,7 +7,7 @@
 } -properties {
 }
 
-if {[string equal $object_type "file_storage_object"]} {
+if {$object_type eq "file_storage_object"} {
     db_dml reindex_file_storage_object {
       insert into search_observer_queue (object_id, event) 
         select object_id, 'INSERT' from acs_objects, cr_items