Index: openacs-4/packages/layout-manager/tcl/page-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/layout-manager/tcl/page-procs.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/layout-manager/tcl/page-procs.tcl	8 Feb 2010 22:23:04 -0000	1.8
+++ openacs-4/packages/layout-manager/tcl/page-procs.tcl	28 Jul 2010 00:28:33 -0000	1.9
@@ -107,6 +107,7 @@
     -page_id:required
     {-pageset_id ""}
     {-name ""}
+    {-url_name ""}
     {-page_template ""}
     {-theme ""}
     {-sort_key ""}
@@ -116,7 +117,8 @@
 
     @param page_id The id of the page to clone.
     @param pageset_id The id of the pageset to place the cloned page in.
-    @param name The page name (used for navigation).
+    @param name The human-readable page name
+    @param url_name The page name used for navigation.
     @param page_template The page template to use to render this page.
     @param sort_key Where in the page order to put the page.
 } {
Index: openacs-4/packages/layout-manager/tcl/page-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/layout-manager/tcl/page-procs.xql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/layout-manager/tcl/page-procs.xql	8 Feb 2010 22:23:04 -0000	1.6
+++ openacs-4/packages/layout-manager/tcl/page-procs.xql	28 Jul 2010 00:28:33 -0000	1.7
@@ -63,10 +63,10 @@
   <fullquery name="layout::page::clone.insert_page">
     <querytext>
       insert into layout_pages
-        (page_id, name, pageset_id, page_template, theme, sort_key)
-      select :new_page_id, coalesce(:name, lp.name), coalesce(:pageset_id, pageset_id),
-        coalesce(:page_template, lp.page_template), coalesce(:theme, lp.theme),
-        coalesce(:sort_key, sort_key)
+        (page_id, name, url_name, pageset_id, page_template, theme, sort_key)
+      select :new_page_id, coalesce(:name, lp.name), coalesce(:url_name, lp.url_name),
+        coalesce(:pageset_id, pageset_id), coalesce(:page_template, lp.page_template),
+        coalesce(:theme, lp.theme), coalesce(:sort_key, sort_key)
       from layout_pages lp
       where lp.page_id = :page_id
     </querytext>