Index: openacs-4/packages/edit-this-page/www/etp-create.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/edit-this-page/www/etp-create.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/edit-this-page/www/etp-create.tcl	13 Jan 2005 13:58:04 -0000	1.3
+++ openacs-4/packages/edit-this-page/www/etp-create.tcl	6 Sep 2011 14:37:45 -0000	1.4
@@ -16,9 +16,7 @@
 set auto_page_name [etp::get_application_param auto_page_name]
 
 if {$auto_page_name == "number"} {
-    set new_page_name [db_string next_page_number {
-	select etp_auto_page_number_seq.nextval from dual
-    }]
+    set new_page_name [db_nextval etp_auto_page_number_seq]
 } elseif {$auto_page_name =="date"} {
     set new_page_name [ns_fmttime [ns_time] "%Y%m%d"]
 } else {