Fix up tcl string escaping.