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.76 -r1.77
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	2 Jun 2008 12:28:13 -0000	1.76
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	3 Jun 2008 11:46:52 -0000	1.77
@@ -964,7 +964,7 @@
                    -publish_status ready \
                    -always_queried_attributes [list _name _title _last_modified _creation_user] \
                    -h_where $wc(h) \
-                   -folder_id [$form_obj parent_id]]
+                   -package_id [$form_obj package_id]]
     foreach i [$items children] {lappend options [list [$i title] [$i name]]}
     my options $options
   }