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