Index: openacs-4/packages/acs-authentication/tcl/sync-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/sync-procs.tcl,v diff -u -r1.29 -r1.30 --- openacs-4/packages/acs-authentication/tcl/sync-procs.tcl 29 Oct 2003 13:28:44 -0000 1.29 +++ openacs-4/packages/acs-authentication/tcl/sync-procs.tcl 31 Oct 2003 09:29:15 -0000 1.30 @@ -355,8 +355,12 @@ } insert { if { ![empty_string_p $user_id] } { - set success_p 0 - set result(message) "A user with username '$username' already exists" + acs_user::get -user_id $user_id -array existing_user_info + if { ![string equal $existing_user_info(member_state) "banned"] } { + # Inserting a user that already exists (and is not deleted) + set success_p 0 + set result(message) "A user with username '$username' already exists" + } } } }