Index: openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	13 Mar 2001 22:59:26 -0000	1.1
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs.tcl	24 Sep 2001 23:45:12 -0000	1.2
@@ -87,6 +87,7 @@
     set hashed_password [ns_sha1 "$password$salt"]
     
     db_transaction {
+
 	db_exec_plsql user_insert {
 	begin
 	    :1 := acs.add_user(user_id => :user_id,
@@ -103,6 +104,7 @@
 	                 member_state => :member_state);
 	    end;
 	} 
+
     } on_error {
 	# we got an error.  log it and signal failure.
 	ns_log Error "Problem creating a new user: $errmsg"