Index: openacs-4/packages/messages/www/read-message.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/messages/www/read-message.tcl,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/messages/www/read-message.tcl 31 Aug 2010 21:30:43 -0000 1.1 +++ openacs-4/packages/messages/www/read-message.tcl 23 Mar 2018 22:56:43 -0000 1.2 @@ -25,7 +25,7 @@ ########################################### #get message ids around the message view -#and set range messages, before or after message display acording to message view. +#and set range messages, before or after message display according to message view. set msg_before [expr [lsearch $parents_ids $msg_id] - 2] set msg_after [expr [lsearch $parents_ids $msg_id] + 2] set parents_ids [lrange $parents_ids $msg_before $msg_after] @@ -59,4 +59,4 @@ if { [empty_string_p $subject] } { set subject "[_ messages.no_subject] " -} \ No newline at end of file +}