Index: openacs-4/packages/acs-tcl/tcl/10-database-procs-postgresql.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/10-database-procs-postgresql.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/acs-tcl/tcl/10-database-procs-postgresql.tcl	9 Apr 2001 04:55:14 -0000	1.8
+++ openacs-4/packages/acs-tcl/tcl/10-database-procs-postgresql.tcl	11 Apr 2001 12:41:21 -0000	1.9
@@ -8,7 +8,7 @@
 }
 
 proc_doc db_nextval { sequence } { Returns the next value for a sequence. This can utilize a pool of sequence values to save hits to the database. } {
-    return [db_string nextval "select nextval('$sequence')"]
+    return [db_string nextval "select ${sequence}.nextval"]
 }
 
 proc_doc db_exec_plsql { statement_name sql args } {