[cl-who-devel] Looks like a bug to me?

[Stas Boukarev]

On Mon, Sep 29, 2008 at 5:03 AM, Robin Lee Powell
<rlpowell at digitalkingdom.org> wrote:
>
> (require 'cl-who)
> (use-package 'cl-who)
> (let ((userid 46))
>    (with-html-output (*standard-output*)
>        (:a :id 7) (str (format nil "~%"))
>        (:a :id "7") (str (format nil "~%"))
>        (:a :id (str userid))))
>
> I'm sure there's some better way to get newlines in the output.
> Anyways, output is:
>
> <a id='7'></a>
> <a id='7'></a>
> <a46 id='46'></a>
>
> That last one is really staggeringly wrong.  Is it me or the code?
>
You don't need (str ...) for atrributes:

(let ((userid 46))
   (with-html-output (*standard-output*)
       (:a :id 7) (str (string #\Newline))
       (:a :id "7") (str (string #\Newline))
       (:a :id userid)))

-- 
With Best Regards, Stas.