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 -N -r1.23 -r1.24 --- openacs-4/packages/search/tcl/search-procs.tcl 23 Mar 2005 02:26:53 -0000 1.23 +++ openacs-4/packages/search/tcl/search-procs.tcl 23 Mar 2005 13:54:34 -0000 1.24 @@ -103,17 +103,9 @@ search::content_get txt $datasource(content) $datasource(mime) $datasource(storage_type) - # send everything interesting in "txt" - # parameter to the service contract - # the sc implementation will need to - # extract the extra elements, if any - set content [list txt $txt] - if {[info exists datasource(package_id)]} { - lappend content package_id $datasource(package_id) - } acs_sc_call FtsEngineDriver \ [ad_decode $event UPDATE update_index index] \ - [list $datasource(object_id) $content $datasource(title) $datasource(keywords)] $driver + [list $datasource(object_id) $txt $datasource(title) $datasource(keywords)] $driver } errMsg]} { ns_log Error "search::indexer: error getting datasource for $object_id $object_type: $errMsg\n[ad_print_stack_trace]\n" } else {