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.231 -r1.232
--- openacs-4/packages/xowiki/tcl/form-field-procs.tcl	30 Mar 2013 10:23:26 -0000	1.231
+++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl	4 Apr 2013 16:07:18 -0000	1.232
@@ -2185,6 +2185,10 @@
   }
   
   abstract_page instproc fetch_entry_label {entry_label item_id} {
+    # The following is a temporary solution, only working with cr-item attributes
+    # We should support as well user level instance attributes.
+    set entry_label [string trimleft $entry_label _]
+
     db_1row [my qn [self proc]] "select $entry_label from cr_items ci, cr_revisions cr
       where cr.revision_id = ci.live_revision and ci.item_id = $item_id"
     return [set $entry_label]