Index: openacs-4/packages/dotlrn/www/admin/user-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user-edit.tcl,v diff -u -r1.10 -r1.11 --- openacs-4/packages/dotlrn/www/admin/user-edit.tcl 11 Feb 2002 19:33:17 -0000 1.10 +++ openacs-4/packages/dotlrn/www/admin/user-edit.tcl 14 Feb 2002 18:03:07 -0000 1.11 @@ -64,13 +64,20 @@ db_transaction { # remove the user - dotlrn::user_remove $user_id + dotlrn::user_remove -user_id $user_id # add the user - dotlrn::user_add -id $id -type $type -access_level $access_level -user_id $user_id + dotlrn::user_add \ + -id $id \ + -type $type \ + -access_level $access_level \ + -user_id $user_id # Update permissions - acs_privacy::set_user_read_private_data -user_id $user_id -object_id [dotlrn::get_package_id] -value $read_private_data_p + acs_privacy::set_user_read_private_data \ + -user_id $user_id \ + -object_id [dotlrn::get_package_id] \ + -value $read_private_data_p } # redirect