[cl-who-devel] Factoring out subtrees

[Edi Weitz]

On Wed, 20 Dec 2006 23:01:41 -0700, Daniel Gackle <gackle at shaw.ca> wrote:

> Hi, I have a really elementary question. I'm generating html that
> has stuff duplicated in it, like the link tag in this example:
>
>    (defun page1 ()
>      (with-html-output-to-string (*standard-output*)
>        (:html
>         (:head (:link :rel "stylesheet" :type "text/css" :href "style.css"))
>         (:body "hi"))))
>
>    (defun page2 ()
>      (with-html-output-to-string (*standard-output*)
>        (:html
>         (:head (:link :rel "stylesheet" :type "text/css" :href "style.css"))
>         (:body "there"))))
>
> How do I eliminate it? Is there a way to do the following?
>
>    (defun page1 ()
>      (with-html-output-to-string (*standard-output*)
>        (:html
>         (:head (css-me-up "style.css"))
>         (:body "hi"))))
>
> More generally, I'd like to build html trees and transform them in
> various ways before passing them to the generator. It feels like
> there must be an obvious answer here, but I'm missing it... so I'm
> asking y'all instead.

Maybe this one?

  http://weitz.de/cl-who/#convert-tag-to-string-list

Cheers,
Edi.