Index: openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl,v diff -u -r1.65.6.13 -r1.65.6.14 --- openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 9 Sep 2014 06:28:40 -0000 1.65.6.13 +++ openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 9 Sep 2014 06:30:21 -0000 1.65.6.14 @@ -1707,7 +1707,7 @@ # Chop off extra whitespace at the end set string [string trimright [string range $string 0 $end_index]] - append string $ellipsis $more" + append string $ellipsis $more } return $string