Index: openacs-4/packages/forums/www/message-view.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/message-view.tcl,v
diff -u -N -r1.27 -r1.28
--- openacs-4/packages/forums/www/message-view.tcl	26 Jan 2004 15:39:47 -0000	1.27
+++ openacs-4/packages/forums/www/message-view.tcl	1 Apr 2004 16:14:30 -0000	1.28
@@ -52,13 +52,17 @@
 ############################################
 
 # Create a search form and action when used
-form create search -action search
-forums::form::search search
+set searchbox_p [parameter::get -parameter ForumsSearchBoxP -default 1]
+if {$searchbox_p} { 
+    form create search -action search
+    forums::form::search search
 
-if {[form is_request search]} {
-  element set_properties search forum_id -value $message(forum_id)
+    if {[form is_request search]} {
+        element set_properties search forum_id -value $message(forum_id)
+    }
 }
-  
+
+
 # If this is a top-level thread, we allow subscriptions here
 if { [empty_string_p $message(parent_id)] } {
     set notification_chunk [notification::display::request_widget \