You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl@perl.apache.org by Doug Rayner <dr...@savicom.net> on 2004/05/06 23:42:04 UTC
Problem with
We are using Embperl::Object V2.0b10
There seems to be a problem with output escaping and <textarea>. If we let
the engine insert the text from %fdat, it seems to always use XML output
escaping. If we provide the text explicitly, it seems to work fine.
For exmple, this works fine, and does HTML escaping as expected:
[- $escmode = 3; -]
<textarea name="foobar" rows="5" cols="80" wrap="off">[+ $fdat{foobar}
+]</textarea>
[- $escmode = 0; -]
This does not work:
[- $escmode = 3; -]
<textarea name="foobar" rows="5" cols="80" wrap="off"></textarea>
[- $escmode = 0; -]
In the later case, if the value in $fdat{foobar} is:
"<html><body>Don't go there!</body></html>"
the following is output:
"<html><body>Don't go there!</html></body>"
Even if $escmode is set to zero!
Thanks and regards,
Doug Rayner
Senior System Architect
Savicom: Next Generation eMail Marketing
http://www.savicom.net
(415) 617-9006
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org
Re: Problem with
Posted by Gerald Richter <ri...@ecos.de>.
Hi,
>
> There seems to be a problem with output escaping and <textarea>. If
> we let the engine insert the text from %fdat, it seems to always use
> XML output escaping. If we provide the text explicitly, it seems to
> work fine.
>
I see the problem, a quick workaround is to change line 82 of
Embperl/Syntax/EmbperlHTML.pm and add 0x20 to the type value e.g.
Embperl::Syntax::ntypText + 0x20
in this case it will always html escape.
I will make a correct fix for the next release
Gerald
> For exmple, this works fine, and does HTML escaping as expected:
>
> [- $escmode = 3; -]
> <textarea name="foobar" rows="5" cols="80" wrap="off">[+ $fdat{foobar}
> +]</textarea>
> [- $escmode = 0; -]
>
> This does not work:
>
> [- $escmode = 3; -]
> <textarea name="foobar" rows="5" cols="80" wrap="off"></textarea>
> [- $escmode = 0; -]
>
> In the later case, if the value in $fdat{foobar} is:
>
> "<html><body>Don't go there!</body></html>"
>
> the following is output:
>
> "<html><body>Don't go
> there!</html></body>"
>
> Even if $escmode is set to zero!
>
>
> Thanks and regards,
>
> Doug Rayner
> Senior System Architect
> Savicom: Next Generation eMail Marketing
> http://www.savicom.net
> (415) 617-9006
>
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
> For additional commands, e-mail: embperl-help@perl.apache.org
---------------------------------------------------------------------------
Gerald Richter ecos electronic communication services gmbh
IT-Securitylösungen * Webapplikationen mit Apache/Perl/mod_perl/Embperl
Post: Tulpenstrasse 5 D-55276 Dienheim b. Mainz
E-Mail: richter@ecos.de Voice: +49 6133 939-122
WWW: http://www.ecos.de/ Fax: +49 6133 939-333
---------------------------------------------------------------------------
Besuchen Sie uns auf der KOMCOM 2004 in Mannheim
25. bis 27. Mai 2004 Stand K11a www.komcom.de
ECOS BB-5000 Firewall- und IT-Security Appliance: www.bb-5000.info
---------------------------------------------------------------------------
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org