Index: openacs.org-dev/packages/acs-admin/www/users/search.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/acs-admin/www/users/search.tcl,v
diff -u -r1.1.1.1 -r1.1.1.2
--- openacs.org-dev/packages/acs-admin/www/users/search.tcl	9 Jul 2002 17:34:56 -0000	1.1.1.1
+++ openacs.org-dev/packages/acs-admin/www/users/search.tcl	8 Oct 2002 15:46:41 -0000	1.1.1.2
@@ -32,12 +32,15 @@
     only_authorized_p:onevalue
     export_authorize:onevalue
     passthrough_parameters:onevalue
+    context:onevalue
 }
 
 # Check input.
 set exception_count 0
 set exception_text ""
 
+set context [list [list "./" "Users"] "Search"]
+
 if [info exists keyword] {
     # this is an administrator 
     if { [empty_string_p $keyword] } {
@@ -148,11 +151,12 @@
 # We are limiting the search to one group - display that group's name
 if { [exists_and_not_null limit_to_users_in_group_id] && ![regexp {[^0-9]} $limit_to_users_in_group_id] } {
     set group_name [db_string user_group_name_from_id "select group_name from user_groups where group_id = :limit_to_users_in_group_id"]
+    set title "User search in $group_name"
 } else {
     set group_name ""
+    set title "User search"
 }
 
 set export_authorize [export_ns_set_vars {url} {only_authorized_p}]
 
-
 ad_return_template