Index: openacs-4/packages/xowiki/tcl/form-field-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/form-field-procs.tcl,v diff -u -r1.149 -r1.150 --- openacs-4/packages/xowiki/tcl/form-field-procs.tcl 20 Apr 2009 14:05:32 -0000 1.149 +++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl 23 Apr 2009 06:18:50 -0000 1.150 @@ -1556,7 +1556,6 @@ -base_item_ids $form_object_item_ids \ -form_fields [list] \ -publish_status ready \ - -always_queried_attributes [list _name _title _last_modified _creation_user _object_package_id] \ -h_where [array get wc] \ -package_id $package_id] foreach i [$items children] { @@ -1565,7 +1564,7 @@ # package_url to the name. TODO: We assume here, that the form_pages # have not special parent_id. # - set object_package_id [$i set object_package_id] + set object_package_id [$i package_id] if {$package_id != $object_package_id} { set package_prefix /[$object_package_id package_url] } else { Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v diff -u -r1.109 -r1.110 --- openacs-4/packages/xowiki/tcl/includelet-procs.tcl 20 Apr 2009 14:05:32 -0000 1.109 +++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl 23 Apr 2009 06:18:50 -0000 1.110 @@ -3275,7 +3275,6 @@ -base_item_ids $form_item_ids \ -form_fields $form_fields \ -publish_status $publish_status \ - -always_queried_attributes [list _name _last_modified _creation_user] \ -extra_where_clause $extra_where_clause \ -h_where [array get wc] \ -package_id $package_id] @@ -3289,7 +3288,6 @@ -base_item_ids $form_item_ids \ -form_fields $form_fields \ -publish_status $publish_status \ - -always_queried_attributes [list _name _last_modified _creation_user] \ -h_where [array get wc] \ -package_id $package_id] } 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 -r1.346 -r1.347 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 20 Apr 2009 14:05:32 -0000 1.346 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 23 Apr 2009 06:18:50 -0000 1.347 @@ -2259,15 +2259,20 @@ {-publish_status ready} {-extra_where_clause ""} {-h_where ""} - {-always_queried_attributes {_name _last_modified _creation_user}} + {-always_queried_attributes ""} {-orderby ""} {-page_size 20} {-page_number ""} } { # # Get query attributes for all tables (to allow e.g. sorting by time) # - set sql_atts [list bt.instance_attributes ci.parent_id] + # The basic essential fields ci.name, ci.publish_status and bt.item_id + # are always automatically fetched + set sql_atts [list ci.parent_id bt.instance_attributes \ + bt.creation_date bt.creation_user bt.last_modified \ + "bt.object_package_id as package_id" bt.title \ + ] foreach att $always_queried_attributes { set name [string range $att 1 end] if {$name eq "name"} {