[cl-who-devel] loop problem

[Leslie P. Polzer]

> I need this expression for creation of a macro:
>
> WEBCAT 24 > (WITH-HTML-OUTPUT (*STANDARD-OUTPUT*)
>                (LOOP FOR ITEM
>                      IN '((FMT "12") (FMT "13"))
>                      DO (HTM (:TD ITEM))))
> <td></td><td></td>
> NIL
>
> how do I have to correct the expression so that the output is
>
> <td>12</td><td>13</td>
> NIL

(with-html-output (*standard-output*)
  (loop for item in '("12" "13")
        do (htm (:td (fmt item)))))

->
<td>12</td><td>13</td>
NIL

-- 
LinkedIn Profile: http://www.linkedin.com/in/polzer
Xing Profile: https://www.xing.com/profile/LeslieP_Polzer
Blog: http://blog.viridian-project.de/