regression for *attribute-quote-char* in cl-who-0.11.1

[Andrei Stebakov]

in cl-who-0.11.0 the *attribute-quote-char* works well:

(let ((cl-who:*attribute-quote-char* #\"))
(with-html-output-to-string (*standard-output* nil :prologue nil :indent nil)
(:p :onmouseover "func()")))

produces:
"<p onmouseover=\"func()\"></p>"

in cl-who-0.11.1 it produces "<p onmouseover='func()'></p>"

Thank you,
Andrei

[Edi Weitz]

Post by Andrei Stebakov
(let ((cl-who:*attribute-quote-char* #\"))
 (with-html-output-to-string (*standard-output* nil :prologue nil :indent nil)
   (:p :onmouseover "func()")))
"<p onmouseover=\"func()\"></p>"
in cl-who-0.11.1 it produces "<p onmouseover='func()'></p>"

Thanks for the report. Please try the current development version
which I just put here:

http://bknr.net/trac/browser/trunk/thirdparty/cl-who

I think it works there.

Thanks,
Edi.