<div dir="ltr">It should work, I am quite baffled that it doesn't...<br>It's Ubuntu with sbcl 1.0.18,
cl-who 0.11.0<br>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.<br>I have to evaluate it in the lisp image + put the (setf *attribute-quote-char* #\") in the body of the hunchentoot handler!<br>
I tried to put the cl-who prefix to the variable, but it doesn't make any difference.<br><br>Andrew<br><br><div class="gmail_quote">On Tue, Aug 12, 2008 at 6:21 PM, Jens Teich <span dir="ltr"><<a href="mailto:info@jensteich.de">info@jensteich.de</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Andrei Stebakov schrieb:<div class="Ih2E3d"><br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
By default the variable is initialized to #\'<br>
If I want to change it to #\" via local binding I still get the single quotes in the resulting string.<br>
<br>
(let ((*attribute-quote-char* #\"))<br>
(with-html-output-to-string (*standard-output* nil :prologue nil :indent nil)<br>
(:html<br>
(:head<br>
(:title "title")<br>
(:meta :name "DESCRIPTION" :content "description")<br>
(:meta :name "KEYWORDS" :content "keywords")))))<br>
<br>
I get:<br>
"<html><head><title>title</title><meta name='DESCRIPTION' content='description' /><meta name='KEYWORDS' content='keywords' /></head></html>"<br>
</blockquote>
<br>
<br></div>
I get the correct result evaluating exactly your form:<br>
<br>
CL-WHO 507 ><div class="Ih2E3d"><br>
(let ((*attribute-quote-char* #\"))<br>
(with-html-output-to-string (*standard-output* nil :prologue nil :indent nil)<br>
(:html<br>
(:head<br>
(:title "title")<br>
(:meta :name "DESCRIPTION" :content "description")<br>
(:meta :name "KEYWORDS" :content "keywords")))))<br></div><div class="Ih2E3d">
"<html><head><title>title</title><meta name=\"DESCRIPTION\" content=\"description\" /><meta name=\"KEYWORDS\" content=\"keywords\" /></head></html>"<br>
<br></div>
LW 5.1<br>
cl-who 0.11.0<br>
Mac OS X 10.5<br>
<br>
Jens<br>
_______________________________________________<br>
cl-who-devel site list<br>
<a href="mailto:cl-who-devel@common-lisp.net" target="_blank">cl-who-devel@common-lisp.net</a><br>
<a href="http://common-lisp.net/mailman/listinfo/cl-who-devel" target="_blank">http://common-lisp.net/mailman/listinfo/cl-who-devel</a><br>
</blockquote></div><br></div>