
Andrei Stebakov schrieb:
By default the variable is initialized to #\' If I want to change it to #\" via local binding I still get the single quotes in the resulting string.
(let ((*attribute-quote-char* #\")) (with-html-output-to-string (*standard-output* nil :prologue nil :indent nil) (:html (:head (:title "title") (:meta :name "DESCRIPTION" :content "description") (:meta :name "KEYWORDS" :content "keywords")))))
I get: "<html><head><title>title</title><meta name='DESCRIPTION' content='description' /><meta name='KEYWORDS' content='keywords' /></head></html>"
I get the correct result evaluating exactly your form: CL-WHO 507 > (let ((*attribute-quote-char* #\")) (with-html-output-to-string (*standard-output* nil :prologue nil :indent nil) (:html (:head (:title "title") (:meta :name "DESCRIPTION" :content "description") (:meta :name "KEYWORDS" :content "keywords"))))) "<html><head><title>title</title><meta name=\"DESCRIPTION\" content=\"description\" /><meta name=\"KEYWORDS\" content=\"keywords\" /></head></html>" LW 5.1 cl-who 0.11.0 Mac OS X 10.5 Jens