Index: openacs-4/packages/xowiki/xowiki.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/xowiki.info,v diff -u -N -r1.180.2.83 -r1.180.2.84 --- openacs-4/packages/xowiki/xowiki.info 26 Jan 2022 10:34:55 -0000 1.180.2.83 +++ openacs-4/packages/xowiki/xowiki.info 31 Jan 2022 13:12:03 -0000 1.180.2.84 @@ -10,7 +10,7 @@ t xowiki - + Gustaf Neumann A xotcl-based enterprise wiki system with multiple object types 2021-09-15 @@ -55,7 +55,7 @@ BSD-Style 2 - + Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v diff -u -N -r1.542.2.140 -r1.542.2.141 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 29 Jan 2022 18:27:07 -0000 1.542.2.140 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 31 Jan 2022 13:12:03 -0000 1.542.2.141 @@ -3397,6 +3397,7 @@ {-instance_attributes ""} {-default_variables ""} {-nls_language ""} + {-state initial} {-creation_user ""} {-publish_status production} {-source_item_id ""} @@ -3440,13 +3441,10 @@ -nls_language $nls_language \ -publish_status $publish_status \ -creation_user $creation_user \ + -state $state \ -instance_attributes $ia \ -page_template ${:item_id}] - if {[info exists :state]} { - $f set state ${:state} - } - # Make sure to load the instance attributes #$f array set __ia [$f instance_attributes]