It should work, I am quite baffled that it doesn't...
It's Ubuntu with sbcl 1.0.18, cl-who 0.11.0
What's funny is that even when I set it to #\" globally and evaluate it in the lisp, it's not enough for hunchentoot to pick it up.
I have to evaluate it in the lisp image + put the (setf *attribute-quote-char* #\") in the body of the hunchentoot handler!
I tried to put the cl-who prefix to the variable, but it doesn't make any difference.

Andrew

On Tue, Aug 12, 2008 at 6:21 PM, Jens Teich <info@jensteich.de> wrote:

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
_______________________________________________
cl-who-devel site list
cl-who-devel@common-lisp.net
http://common-lisp.net/mailman/listinfo/cl-who-devel