Index: openacs-4/packages/layout-managed-subsite/www/admin/layouts/copy-elements.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/layout-managed-subsite/www/admin/layouts/copy-elements.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/layout-managed-subsite/www/admin/layouts/copy-elements.tcl	26 Nov 2008 11:10:23 -0000	1.1
+++ openacs-4/packages/layout-managed-subsite/www/admin/layouts/copy-elements.tcl	3 Dec 2008 09:22:00 -0000	1.2
@@ -21,7 +21,14 @@
 
         if { [lsearch -exact $copied_element_ids $one_element_id] == -1 } {
             lappend copied_element_ids $one_element_id
-            layout::element::copy -element_id $one_element_id -state hidden
+            array set element [layout::element::get -element_id $one_element_id]
+            set page_id $element(page_id)
+            set page_column $element(page_column)
+            set sort_key [db_string get_sort_key {}]
+            layout::element::clone \
+                -element_id $one_element_id \
+                -sort_key $sort_key \
+                -state hidden
         }
     }
 }