Index: openacs-4/packages/xowiki/tcl/package-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/package-procs.tcl,v diff -u -r1.202 -r1.203 --- openacs-4/packages/xowiki/tcl/package-procs.tcl 28 Apr 2010 12:14:57 -0000 1.202 +++ openacs-4/packages/xowiki/tcl/package-procs.tcl 30 Apr 2010 07:53:05 -0000 1.203 @@ -1930,6 +1930,7 @@ delete {{package_id admin}} save-tags login popular-tags login + create-child {{item_id create}} create-new {{parent_id create}} create-or-use {{parent_id create}} } -set default_permission {{package_id write}} @@ -1941,8 +1942,6 @@ download none } Class Form -array set require_permission { - create-new {{parent_id create}} - create-or-use {{parent_id create}} list {{package_id read}} } Class CrFolder -array set require_permission { @@ -1989,8 +1988,9 @@ delete swa save-tags login popular-tags login - create-new {{parent_id create}} - create-or-use {{parent_id create}} + create-child {{item_id create}} + create-new {{parent_id create}} + create-or-use {{parent_id create}} } Class Object -array set require_permission { @@ -2001,8 +2001,6 @@ } Class Form -array set require_permission { view {{package_id read}} - create-new {{parent_id create}} - create-or-use {{parent_id create}} list {{package_id read}} } } @@ -2042,8 +2040,9 @@ delete swa save-tags login popular-tags login - create-new {{parent_id create}} - create-or-use {{parent_id create}} + create-child {{item_id create}} + create-new {{parent_id create}} + create-or-use {{parent_id create}} } Class Object -array set require_permission { @@ -2053,8 +2052,6 @@ download {{package_id read}} } Class Form -array set require_permission { - create-new {{parent_id create}} - create-or-use {{parent_id create}} list {{item_id read}} } # Class FormPage -array set require_permission { @@ -2107,8 +2104,9 @@ delete swa save-tags login popular-tags login - create-new {{item_id write}} - create-or-use {{item_id write}} + create-child {{item_id create}} + create-new {{parent_id create}} + create-or-use {{parent_id create}} } Class Object -array set require_permission { @@ -2127,8 +2125,6 @@ view admin edit admin list admin - create-new {{item_id write}} - create-or-use {{item_id write}} } }