[cxml-devel] Ho do I write the following on a sink?

Tue May 10 18:18:49 UTC 2011

Hi

I am trying to write "Λ" on a sink.

 (let ((sink (cxml:make-character-stream-sink *standard-output* :indentation 2 :canonical nil)))
  (sax:start-document sink)
  (xhtml-generator:write-doctype sink)
  (xhtml-generator:with-html sink
    (:html
     (:head
      (:title "Titel"))
     (:body
      ((:p "style" "font-weight: bold")
       "Inhalt")
      (:ul
       (:li "Eins")
       (:li "Zwei") (:li "Λ")
       (:li "Drei")))))
  (sax:end-document sink))
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
  <head>
    <title>
      Titel</title>
  </head>
  <body>
    <p style="font-weight: bold">
      Inhalt</p>
    <ul>
      <li>
        Eins</li>
      <li>
        Zwei</li>
      <li>
        &Lambda;</li>
      <li>
        Drei</li>
    </ul>
  </body>
</html>
#<EDITOR::RUBBER-STREAM #<EDITOR:BUFFER CAPI interactive-pane 2> 219C7A3F>

How do I get it "right"?

Thank

--
Marco Antoniotti

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cxml-devel/attachments/20110510/de2b0854/attachment.html>