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.153 -r1.154
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	1 Jun 2009 07:21:42 -0000	1.153
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	3 Jun 2009 06:42:58 -0000	1.154
@@ -1655,7 +1655,7 @@
              -where_clause "p.page_id = bt.revision_id $extra_where_clause" \
              -orderby ci.name \
             ] {
-              lappend options [list [set $entry_label] $name]
+              lappend options [list [set [my entry_label]] $name]
             }
     my options $options
   }