Index: openacs-4/packages/xotcl-core/tcl/cr-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/cr-procs.tcl,v
diff -u -r1.40 -r1.41
--- openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	7 Jul 2010 04:24:44 -0000	1.40
+++ openacs-4/packages/xotcl-core/tcl/cr-procs.tcl	8 Jul 2010 12:05:12 -0000	1.41
@@ -567,7 +567,7 @@
     if {![info exists parent_id]} {set parent_id $folder_id}
 
     if {$base_table eq "cr_revisions"} {
-      set attributes [list ci.item_id ci.name ci.publish_status acs_objects.object_type] 
+      set attributes [list ci.item_id ci.name ci.publish_status acs_objects.object_type acs_objects.package_id] 
     } else {
       set attributes [list bt.item_id ci.name ci.publish_status bt.object_type "bt.object_package_id as package_id"] 
     }