Do not double backslashes

~S binds *print-escape* to T, and for any backslash resulting from %js outputs two backslashes, effectively escaping the backslash.  Using ~A fixes this.