On Mon, 21 Jan 2002, Olaf [x-unknown] P�schel wrote:
> Hi again!
>
> >OK, one more try:
>
> >$t->{'top'}{testcode} = sub {
> >my ($node, $t) = @_;
> >$t->{pre} = "A List\n\n";
> >my $pos = 1;
> >foreach my $kid ($node->findnodes('./node()')) {
> >if ($kid->isElementNode && $kid->getName eq 'sub') {
> >$t->{pre} .= "$pos) ";
> >$pos++;
> >}
> >$t->{pre} .= apply_templates($kid);
> >}
> >return DO_SELF_ONLY;
> >}
>
> Yes! This finally did the job. But <complain-mode>should this not be *much*
> more easier and straightforward?</complain-mode>
Yes, use XSLT ;-)
--
<!-- Matt -->
<:->Get a smart net</:->
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
