Index: openacs-4/packages/layout-manager/tcl/element-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/layout-manager/tcl/element-procs.xql,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/layout-manager/tcl/element-procs.xql	3 Dec 2008 09:22:00 -0000	1.3
+++ openacs-4/packages/layout-manager/tcl/element-procs.xql	6 Feb 2010 01:46:31 -0000	1.4
@@ -54,6 +54,15 @@
         </querytext>
     </fullquery>
 
+    <fullquery name="layout::element::clone_p.clone_p">
+        <querytext>
+          select count(*) as element_count
+          from layout_elements
+          where package_id = :package_id
+            and includelet_name = :includelet_name
+        </querytext>
+    </fullquery>
+
     <fullquery name="layout::element::delete.delete_element">
         <querytext>
             delete