> > But I'm having a little trouble with textareas. > > Given this input, > > <textarea name="foo">test</textarea> > > and > > $self->AddTag("textarea", ["id", "name", "rows", "cols"], > undef(), undef(), > { perlcode => q{ > print STDERR > "|".XML::Embperl::DOM::Node::iChildsText(%$n%)."|\n"; > _ep_rp(%$x%, > $epreq->Escape(XML::Embperl::DOM::Node::iChildsText(%$n%), 5)); > }}); >
If I remeber right out of my head you should use perlcodeend => instead of perlcode => because the XML::Embperl::DOM::Node::iChildsText needs to run at the end of the textarea. Gerald ** Virus checked by BB-5000 Mailfilter ** --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]