Index: openacs-4/packages/directory/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/directory/www/index.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/directory/www/index.tcl	21 Oct 2001 21:44:46 -0000	1.3
+++ openacs-4/packages/directory/www/index.tcl	4 Sep 2002 09:38:04 -0000	1.4
@@ -20,7 +20,7 @@
 } -properties {
     page_title:onevalue
     all_user_data:multirow
-    context_bar_args:onevalue
+    context:onevalue
     system_name:onevalue
     package_url:onevalue
     header_link_vars:onevalue
@@ -30,6 +30,8 @@
     total_users:onevalue
 }
 
+set context {} 
+
 set valid_numrows [list 10 20 50 0]
 if { [lsearch $valid_numrows $num_rows] < 0 } {
     set num_rows 20
@@ -62,6 +64,7 @@
     set where_text " with something matching &quot;$search&quot;"
     set alpha_nav_bar ""
 } elseif {![empty_string_p $letter] && $letter != "all"} {
+    set where_text " with last names starting with &quot;$letter&quot;"
     set where_clause [db_map where_2]
     set alpha_nav_bar [dir_alpha_nav_bar -group_id $group_id -all_users $all_users $letter start_row]
 } else {