Index: openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl,v diff -u -r1.94 -r1.95 --- openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl 20 Dec 2007 14:29:40 -0000 1.94 +++ openacs-4/packages/xowiki/tcl/xowiki-form-procs.tcl 28 Dec 2007 16:49:29 -0000 1.95 @@ -475,7 +475,12 @@ if {$widgetinfo ne ""} { foreach {y m day hour min} $widgetinfo break set t [clock scan "${hour}:$min $m/$day/$y"] - return [clock format $t -format "%y-%m-%d %T"] + # + # be sure to avoid bad side effects from LANG environment variable + # + set ::env(LANG) en_US.UTF-8 + return [clock format $t] + #return [clock format $t -format "%y-%m-%d %T"] } return "" }