Index: openacs-4/packages/acs-tcl/tcl/stack-trace-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/stack-trace-procs.tcl,v diff -u -r1.3.12.3 -r1.3.12.4 --- openacs-4/packages/acs-tcl/tcl/stack-trace-procs.tcl 27 Nov 2016 12:19:35 -0000 1.3.12.3 +++ openacs-4/packages/acs-tcl/tcl/stack-trace-procs.tcl 10 Jan 2017 08:29:21 -0000 1.3.12.4 @@ -29,7 +29,8 @@ for {set i [info level]} {$i > 0} {incr i -1} { set call [info level $i] if {[string length $call] > 160} { - set call "[string range $call 0 150]..." } + set call "[string range $call 0 150]..." + } regsub -all {\n} $call {\\n} call lappend callStack " $call" if {$i > 1} {