perl-embperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From "Gerald Richter" <rich...@ecos.de>
Subject RE: Autoescaping using syntax modes
Date Fri, 01 Sep 2006 04:03:58 GMT
> 
> 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: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org


Mime
View raw message