Index: openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl,v
diff -u -r1.239 -r1.240
--- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	5 Nov 2009 12:34:16 -0000	1.239
+++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl	6 Nov 2009 12:26:19 -0000	1.240
@@ -275,7 +275,7 @@
   Page instproc new_link {-name -title -nls_language -parent_id page_package_id} {
     if {[info exists parent_id] && $parent_id eq ""} {unset parent_id}
     return [$page_package_id make_link -with_entities 0 $page_package_id \
-		edit-new object_type name title nls_language return_url autoname]
+		edit-new object_type name title nls_language return_url parent_id autoname]
   }
 
   Page instproc edit_set_default_values {} {