2

我正在尝试使用 cl-who 生成以下 html 代码：

<html>
<body>
<div id="cnt_1"></div>
<div id="cnt_2"></div>
<div id="cnt_3"></div>
</body>
</html>

这是我认为可行的代码：

(with-html-output-to-string (*standard-output* nil)
 (:html
  (:body
   (do ((cnt 1 (+ cnt 1)))
       ((> cnt 3))
     (htm (:div :id (format t "cnt_~A" cnt)))))))

但相反，我得到以下输出：

<html><body><divcnt_1></div><divcnt_2></div><divcnt_3></div></body></html>

似乎 :id 不适用于函数调用。这是否意味着我不能在 cl-who 中使用格式？我应该改用什么？

4

1 回答 1

5

那是因为您不想直接在流中写入。

CL-USER> (with-html-output-to-string (s) (:div :id "test"))
"<div id='test'></div>"

CL-USER> (with-html-output-to-string (s)
           (:html
            (:body
             (do ((cnt 1 (+ cnt 1)))
                 ((> cnt 3))
               (htm (:div :id (format nil "cnt_~A" cnt)))))))

"<html><body><div id='cnt_1'></div><div id='cnt_2'></div><div id='cnt_3'></div></body></html>"

顺便说一句，如果您想直接在流中写入，请使用 CL-WHO:FMT。

于 2012-07-03T15:42:39.733 回答