Re: [cl-who-devel] Case sensitive tags with cl-who

Thinking about it again, I think this patch is a bad idea. It's possible to have the desired effect without touching the code base with something like: (defmacro with-xml ((&key (prologue "<?xml version=\"1.0\"?>")) &body body) "Write the xml strings to the standard output." `(with-output-to-string (*standard-output*) ,(let (*downcase-tokens-p*) (macroexpand `(with-html-output (*standard-output* nil :prologue ,prologue) ,@body)))))