(ob:gettext :about)

(ob:post-content-html (ob:get-snippet "About"))

(ob:gettext :links)

    (ob:post-content-html (ob:get-snippet "Navigation Footer"))

(ob:gettext :archives)

    (loop for p in (let ((POSTS ALL-POSTS)) (ob:get-posts nil 10)) do (insert (format "
  • %s
  • " (ob:path-to-root) (ob:post-htmlfile p) (ob:post-title p) )))

(ob:gettext :tags)

(ob:insert-template "nav_tag-cloud.html")
(ob:post-content-html (ob:get-snippet "Copyright"))

(ob:gettext :powered-by) o-blog.