Index: openacs-4/packages/forums/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/index.tcl,v diff -u -N -r1.10 -r1.11 --- openacs-4/packages/forums/www/index.tcl 17 Dec 2003 15:45:30 -0000 1.10 +++ openacs-4/packages/forums/www/index.tcl 1 Apr 2004 16:14:30 -0000 1.11 @@ -11,11 +11,12 @@ set package_id [ad_conn package_id] set user_id [ad_verify_and_get_user_id] set admin_p [permission::permission_p -party_id $user_id -object_id $package_id -privilege admin] +set searchbox_p [parameter::get -parameter ForumsSearchBoxP -package_id $package_id -default 1] # Create a search form and action when used -form create search -action search -forums::form::search search +if {$searchbox_p} { + form create search -action search + forums::form::search search +} set context {} - -ad_return_template