Index: openacs-4/packages/file-storage/www/search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/search.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/file-storage/www/search.tcl	5 Sep 2002 09:29:00 -0000	1.2
+++ openacs-4/packages/file-storage/www/search.tcl	5 Nov 2002 17:19:59 -0000	1.3
@@ -13,7 +13,7 @@
 }
 
 set user_id [ad_conn user_id]
-set context "Search"
+set context [_ file-storage.Search]
 
 # Bash the query to lowercase
 
@@ -38,4 +38,4 @@
 
 set query $orig_query
 
-ad_return_template
\ No newline at end of file
+ad_return_template