Index: openacs-4/packages/search/www/search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/search/www/search.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/search/www/search.tcl	2 Sep 2001 18:11:39 -0000	1.1
+++ openacs-4/packages/search/www/search.tcl	3 Sep 2001 07:14:40 -0000	1.2
@@ -19,6 +19,13 @@
 set package_id [ad_conn package_id]
 set driver [ad_parameter -package_id $package_id FtsEngineDriver]
 array set info [acs_sc_call FtsEngineDriver info [list] $driver]
+
+if { [array get info] == "" } {
+    ReturnHeaders
+    ns_write "FtsEngineDriver not available!"
+    return
+} 
+
 set limit [ad_parameter -package_id $package_id LimitDefault]
 
 set title "Search Results"