Use cl-who to create the HTML output, in which a <meta> tag is used to specify UTF8.<br><br>From <a href="https://github.com/mcandre/doeshunchentootwork/blob/master/doeshunchentootwork.lisp">https://github.com/mcandre/doeshunchentootwork/blob/master/doeshunchentootwork.lisp</a>.<br>
<br><pre><div style="background-color: transparent;" class="line" id="LC42"><span class="o">(</span>defmacro standard-page <span class="o">((</span>&key title<span class="o">)</span> &body body<span class="o">)</span></div>
<div style="background-color: transparent;" class="line" id="LC43"><span class="sb">`</span><span class="o">(</span>cl-who:with-html-output-to-string <span class="o">(</span>*standard-output* nil :prologue t :indent t<span class="o">)</span></div>
<div style="background-color: transparent;" class="line" id="LC44"> <span class="o">(</span>:html :xmlns <span class="s2">"<a href="http://www.w3.org/1999/xhtml">http://www.w3.org/1999/xhtml</a>"</span> :xml<span class="se">\:</span>lang <span class="s2">"en"</span> :lang <span class="s2">"en"</span></div>
<div style="background-color: transparent;" class="line" id="LC45"> <span class="o">(</span>:head</div><div style="background-color: transparent;" class="line" id="LC46"> <span class="o">(</span>:title ,title<span class="o">)</span></div>
<div style="background-color: transparent;" class="line" id="LC47"> <span class="o">(</span>:meta :http-equiv <span class="s2">"Content-Type"</span> :content <span class="s2">"text/html;charset=utf-8"</span><span class="o">))</span></div>
<div style="background-color: transparent;" class="line" id="LC48"> <span class="o">(</span>:body :style <span class="s2">"text-align: center;"</span></div><div style="background-color: transparent;" class="line" id="LC49">
<span class="o">(</span>:a :href <span class="s2">"<a href="https://github.com/mcandre/doeshunchentootwork">https://github.com/mcandre/doeshunchentootwork</a>"</span> <span class="s2">"GitHub"</span><span class="o">)</span></div>
<div style="background-color: transparent;" class="line" id="LC50"> <span class="o">(</span>:h1 <span class="s2">"Does Hunchentoot work?"</span><span class="o">)</span></div><div style="background-color: transparent;" class="line" id="LC51">
,@body<span class="o">))))</span></div></pre><br clear="all"><div><br></div>Cheers,<div><br></div><div>Andrew Pennebaker</div><div><a href="http://www.yellosoft.us" target="_blank">www.yellosoft.us</a></div><br>
<br><br><div class="gmail_quote">On Wed, Mar 9, 2011 at 3:19 PM, Haris <span dir="ltr"><<a href="mailto:fbogdanovic@xnet.hr">fbogdanovic@xnet.hr</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">
Hi.<br>
<br>
How to set Hunchentoot encoding to utf-8 ?<br>
<br>
Thanks<br>
<br>
_______________________________________________<br>
tbnl-devel site list<br>
<a href="mailto:tbnl-devel@common-lisp.net">tbnl-devel@common-lisp.net</a><br>
<a href="http://common-lisp.net/mailman/listinfo/tbnl-devel" target="_blank">http://common-lisp.net/mailman/listinfo/tbnl-devel</a><br>
</blockquote></div><br>