Index: openacs-4/packages/messages/www/read.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/messages/www/read.tcl,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/messages/www/read.tcl 31 Aug 2010 21:30:45 -0000 1.1 +++ openacs-4/packages/messages/www/read.tcl 11 Oct 2018 11:19:54 -0000 1.2 @@ -116,8 +116,8 @@ set contact_names [string range $contact_names 0 [expr [string length $contact_names] - 60]] set cur_time [clock format [clock seconds] -format "%Y %m %d"] set sent_time_seconds [clock format [clock scan $sent_date] -format "%Y %m %d"]] - set day_recive [lc_time_fmt $sent_date "%d %b, %Y" ] - set ansi_time "$day_recive - $time" + set day_receive [lc_time_fmt $sent_date "%d %b, %Y" ] + set ansi_time "$day_receive - $time" set msg_content [template::util::richtext::get_property contents $msg_content] if { [lindex $cur_time 0] > [lindex $sent_time_seconds 0]} { set date [lc_time_fmt $sent_date "%D"]