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.103 -r1.104 --- openacs-4/packages/xowiki/tcl/form-field-procs.tcl 29 Sep 2008 10:23:52 -0000 1.103 +++ openacs-4/packages/xowiki/tcl/form-field-procs.tcl 29 Sep 2008 10:43:37 -0000 1.104 @@ -737,7 +737,7 @@ numeric instproc convert_to_internal {} { if {[my value] ne ""} { set value [lc_parse_number [my value] [my locale] [my set is_integer]] - my set __refresh_instance_attributes [list [my name] $value] + my set __refresh_instance_attributes [list [my name] [expr {$value}]] return } }