[cl-who-devel] Factoring out subtrees

[Daniel Gackle]

< Maybe this one? >

Doh! Yes. I must have read that at some point.

Thanks Edi,
Dan


-----Original Message-----
From: Edi Weitz [mailto:edi at agharta.de] 
Sent: Thursday, December 21, 2006 12:52 AM
To: Daniel Gackle
Cc: cl-who-devel at common-lisp.net
Subject: Re: [cl-who-devel] Factoring out subtrees

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.