Index: openacs-4/packages/acs-kernel/sql/postgresql/acs-objects-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/postgresql/acs-objects-create.sql,v
diff -u -r1.56 -r1.57
--- openacs-4/packages/acs-kernel/sql/postgresql/acs-objects-create.sql	15 Sep 2007 18:17:37 -0000	1.56
+++ openacs-4/packages/acs-kernel/sql/postgresql/acs-objects-create.sql	17 Sep 2007 09:43:56 -0000	1.57
@@ -657,8 +657,7 @@
   v_object_type_pretty_name   acs_object_types.pretty_name%TYPE;
 begin
   if new__object_id is null then
-   select acs_object_id_seq.nextval
-   into v_object_id from dual;
+    select nextval(''t_acs_object_id_seq'') into v_object_id;
   else
     v_object_id := new__object_id;
   end if;