Unquote-splicing (,@) is your friend:

`(foo ,@(if p? '(a (b) c) '()) d)

When p? -> (foo a (b) c d).
When (not p?) -> (foo d).

Now do this for SXML …

Reply via email to