Index: openacs-4/packages/acs-authentication/tcl/authority-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/authority-procs.tcl,v diff -u -r1.22.2.1 -r1.22.2.2 --- openacs-4/packages/acs-authentication/tcl/authority-procs.tcl 25 Mar 2004 18:36:05 -0000 1.22.2.1 +++ openacs-4/packages/acs-authentication/tcl/authority-procs.tcl 1 Jul 2004 13:01:04 -0000 1.22.2.2 @@ -73,7 +73,7 @@ db_transaction { if { [empty_string_p $authority_id] } { - set authority_id [db_nextval "auth_authority_id_seq"] + set authority_id [db_nextval "acs_object_id_seq"] } set names [array names row]