Forum OpenACS Q&A: Response to Support for multibyte: .tcl ok .adp not

(repost due to not checking "HTML" in post form)I have tried the suggestions in this thread, but am still seeing a problem.

The error I get concerns this:

extra characters after close-quote
    while compiling
"eval "uplevel { ns_write "
    ("if" then script line 2)
    while compiling
"if { $cache_p } {
	eval "uplevel { ns_write "$http_header [ns_startcontent -type $mimetype] [ns_adp_eval -parser fancy {$template}]" }"
	} else {
	   ..."
    ("if" else script line 26)
    while compiling
"if { [llength $available_templates] == 0 } {
	ad_return_error "No template available" "We can't find any template for presenting the output of this sc..."
    (compiling body of proc "ad_return_template", line 34)
    invoked from within
"ad_return_template
"
    ("uplevel" body line 154)
    invoked from within
"uplevel 1 $code"
    (procedure "source_with_encoding" line 11)
    invoked from within
"source_with_encoding $ad_conn(file)"

Which I get regardless of whether I use Gaizka's suggested change, or Kenny Chiang's modification. The target encoding is shift_jis. The other modules that we "need" work, but they are not templated like ecommerce is.

Any help welcome. I will be on #openacs on irc.openprojects.net for those of you with IRC access during this evening (Sept 27th, EST).