Index: openacs.org-dev/packages/acs-admin/www/users/user-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs.org-dev/packages/acs-admin/www/users/user-add.tcl,v diff -u -r1.1.1.1 -r1.1.1.2 --- openacs.org-dev/packages/acs-admin/www/users/user-add.tcl 9 Jul 2002 17:34:56 -0000 1.1.1.1 +++ openacs.org-dev/packages/acs-admin/www/users/user-add.tcl 8 Oct 2002 15:46:41 -0000 1.1.1.2 @@ -5,11 +5,11 @@ } -query { {referer "/acs-admin/users"} } -properties { - context_bar:onevalue + context:onevalue export_vars:onevalue } -set context_bar [ad_admin_context_bar [list "index.tcl" "Users"] "Add user"] +set context [list [list "./" "Users"] "Add user"] # generate unique key here so we can handle the "user hit s" case set user_id [db_nextval acs_object_id_seq]