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.173 -r1.174 --- openacs-4/packages/xowiki/tcl/package-procs.tcl 28 Apr 2009 07:42:58 -0000 1.173 +++ openacs-4/packages/xowiki/tcl/package-procs.tcl 30 Apr 2009 07:38:50 -0000 1.174 @@ -1610,6 +1610,12 @@ create-or-use {{item_id write}} list {{item_id read}} } +# Class FormPage -array set require_permission { +# view { +# {{is_true {_creation_user == @current_user@}} item_id read} +# swa +# } +# } } #Policy policy4 -contains {