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.185 -r1.186 --- openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 5 Oct 2008 01:50:44 -0000 1.185 +++ openacs-4/packages/xowiki/tcl/xowiki-www-procs.tcl 6 Oct 2008 14:15:20 -0000 1.186 @@ -452,10 +452,9 @@ -form_constraints } { - #set sql_atts [list ci.name bt.instance_attributes] + array set __att [list publish_status 1] foreach att [::xowiki::FormPage array names db_slot] {set __att($att) 1} foreach att [list last_modified creation_user] { - lappend sql_atts bt.$att set __att($att) 1 }