Index: openacs-4/packages/search/www/search.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/search/www/search.tcl,v diff -u -r1.19 -r1.20 --- openacs-4/packages/search/www/search.tcl 8 Nov 2005 18:24:08 -0000 1.19 +++ openacs-4/packages/search/www/search.tcl 4 Jun 2006 00:45:56 -0000 1.20 @@ -93,7 +93,7 @@ if {[ad_parameter -package_id $package_id SubsiteSearchP -default 1] && [subsite::main_site_id] != [ad_conn subsite_id]} { # We are in a subsite and SubsiteSearchP is true - lappend params [subsite::util::packages -node_id [ad_conn node_id]] + lappend params [concat [ad_conn subsite_id] [subsite::util::packages -node_id [ad_conn node_id]]] } else { lappend params {} } @@ -156,7 +156,7 @@ set nstopwords [llength $result(stopwords)] set count $result(count) -template::multirow create searchresult title_summary txt_summary url_one +template::multirow create searchresult title_summary txt_summary url_one object_id for { set __i 0 } { $__i < [expr $high - $low +1] } { incr __i } {