Whoops, I changed the name to register.tcl, then forgot I changed it.
I used the code from packages/acs-subsite/lib/user-new.tcl.
Are you sure the log out and reassign new id is working correctly in the instance I cited? If so, I'll try to see if something I did broke the code, but upon looking at it, the changes I made are mostly superficial.
Thanks.