<lisp>(ob:blog-title BLOG)</lisp> index.xml" rel="self" /> "/> (ob:format-date (ob:get-header "DATE")) (ob:get-header "URL")index.xml (loop for p in (ob:get-posts nil 10) do (progn (insert "" (format "%s" (ob:post-title p)) (format "%s" (ob:get-header "AUTHOR")) (format "" (ob:get-header "URL") (ob:post-htmlfile p)) (format "%s" (ob:format-date (ob:post-timestamp p))) (format "%s" (ob:format-date (ob:post-timestamp p))) (format "%s" (ob:post-htmlfile p))) (loop for tag in (ob:post-tags p) do (insert (format "" (ob:tags-safe tag) (ob:tags-name tag) (ob:tags-name tag)))) (insert (format "%s" (htmlize-protect-string(ob:post-content-html p))) "")))