Index: openacs-4/packages/search/www/search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/search/www/search.tcl,v
diff -u -r1.41.2.3 -r1.41.2.4
--- openacs-4/packages/search/www/search.tcl	22 Apr 2021 18:50:00 -0000	1.41.2.3
+++ openacs-4/packages/search/www/search.tcl	28 Feb 2022 20:14:25 -0000	1.41.2.4
@@ -9,7 +9,7 @@
     {num:range(0|200) 0}
     {dfs:word,trim,notnull ""}
     {dts:word,trim,notnull ""}
-    {search_package_id:naturalnum ""}
+    {search_package_id:naturalnum,object_id ""}
     {scope ""}
     {object_type:token ""}
 } -validate {
@@ -54,7 +54,7 @@
 set driver [parameter::get -package_id $package_id -parameter FtsEngineDriver]
 if {[callback::impl_exists -impl $driver -callback search::driver_info]} {
     array set info [lindex [callback -impl $driver search::driver_info] 0]
-#    array set info [list package_key intermedia-driver version 1 automatic_and_queries_p 1  stopwords_p 1]
+    # array set info [list package_key intermedia-driver version 1 automatic_and_queries_p 1  stopwords_p 1]
 } else {
     array set info [acs_sc::invoke -contract FtsEngineDriver -operation info -call_args [list] -impl $driver]
 }