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.45 -r1.46 --- openacs-4/packages/xowiki/tcl/form-field-procs.tcl 7 Dec 2007 14:25:04 -0000 1.45 +++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl 12 Dec 2007 18:00:01 -0000 1.46 @@ -1167,7 +1167,11 @@ set location_val [$location value] set location_txt "" if {$location_val ne ""} { - set location_txt "[$location label]: $location_val" + set location_label [$location label] + if {[regexp {^#(.+)#$} $location_label _ msg_key]} { + set location_label [lang::message::lookup [my locale] $msg_key] + } + set location_txt "$location_label: $location_val" } append result \