Index: openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql,v
diff -u -N -r1.23 -r1.24
--- openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql	8 Aug 2007 11:43:57 -0000	1.23
+++ openacs-4/packages/new-portal/tcl/portal-procs-oracle.xql	24 Apr 2009 11:51:20 -0000	1.24
@@ -79,14 +79,9 @@
     <fullquery name="portal::add_element_to_region.insert">
         <querytext>
             insert into portal_element_map
-            (element_id, name, pretty_name, page_id, datasource_id, region,
-             sort_key)
+            (element_id, name, pretty_name, page_id, datasource_id, region, sort_key)
             values
-            (:new_element_id, :ds_name, :pretty_name, :page_id, :ds_id, :region,
-             nvl((select max(sort_key) + 1
-                  from portal_element_map
-                  where region = :region
-                  and page_id = :page_id), 1))
+            (:new_element_id, :ds_name, :pretty_name, :page_id, :ds_id, :region, :sort_key)
         </querytext>
     </fullquery>