[hunchentoot-devel] cl-who and case-sensitive XML generation

[Edi Weitz]

On Sat, Jun 6, 2009 at 8:04 PM, Patrick May<patrick.may at mac.com> wrote:

> (let ((cl-who::*downcase-tokens-p* nil))
>   (cl-who:with-html-output-to-string (*standard-output*
>                                       nil
>                                       :indent t)
>     (:|Capitalized|
>       (:|CapitalizedCamel| :|camelCase| "foo"
>         "bar"))))
>
> This outputs:
>
> "
> <capitalized>
>   <capitalizedcamel camelcase='foo'>
>     bar
>   </capitalizedcamel>
> </capitalized>"

Which version are you using?  Works for me with the dev version:

CL-USER 1 > (let ((cl-who:*downcase-tokens-p* nil))
  (cl-who:with-html-output-to-string (*standard-output*
                                      nil
                                      :indent t)
    (:|Capitalized|
      (:|CapitalizedCamel| :|camelCase| "foo"
        "bar"))))
"
<Capitalized>
  <CapitalizedCamel camelCase='foo'>bar
  </CapitalizedCamel>
</Capitalized>"

There's no need for the double colon, BTW.

> If it can, can it also generate double-
> quoted strings ("foo" instead of 'foo')?

http://weitz.de/cl-who/#*attribute-quote-char*

Cheers,
Edi.