You are viewing a plain text version of this content. The canonical link for it is here.

Posted to embperl@perl.apache.org by RobertCZ <ro...@robert.cz> on 2006/11/18 11:50:48 UTC

curr_esc_mode error in 2.2

Hello,

  I've just upgraded to 2.2 and now one of my vhost says

[22750]ERR: 24: Error in Perl code: Can't locate object method 
"curr_esc_mode" via package "Embperl::Component" at 
/home/www/_cms/doc/parkhotel-pruhonice/cms/hotel_en.html line 2.

  Apparently the problem is in this syntax file

> sub Init {
>     my ($self) = @_  ;
>     $self -> AddTagBlock ('h2', ['color'], undef, undef, { perlcode => q{
>             { $epreq -> component -> curr_esc_mode(0);
>                 _ep_rp(%$x%, "<h2><img border=0 src=\"/img/h2.gif?color="
>                 . $epreq -> Escape( %&'color%, 2 )
>                 . "&text="
>                 . $epreq -> Escape( 
> XML::Embperl::DOM::Node::iChildsText(%$n%), 2 )
>                 . "\"></h2>");
>             }}
>         }) ;
> }

It worked fine in my previous version, but I don't remember what it was 
- I remember vaguely you sent me  a simple patch for 2.0.x but I can't 
find it again and apparently it dodn't get to the official version. 
Thanks for your help

- Robert


PS Now it shows this:

  http://www.parkhotel-pruhonice.cz/en/hotel.html

instead of correct

  http://www.parkhotel-pruhonice.germic.cz/en/hotel.html

Re: curr_esc_mode error in 2.2

Posted by RobertCZ <ro...@robert.cz>.

OK, good old Google comes to help: you advised

http://www2.ecos.de/~mailarc/embperl/2006-01/msg00026.html
http://www2.ecos.de/~mailarc/embperl/2006-01/msg00031.html
http://www2.ecos.de/~mailarc/embperl/2006-01/msg00034.html
http://www2.ecos.de/~mailarc/embperl/2006-01/msg00036.html

Now it works.



RobertCZ wrote:
> Hello,
>
>   I've just upgraded to 2.2 and now one of my vhost says
>
> [22750]ERR: 24: Error in Perl code: Can't locate object method 
> "curr_esc_mode" via package "Embperl::Component" at 
> /home/www/_cms/doc/parkhotel-pruhonice/cms/hotel_en.html line 2.
>
>   Apparently the problem is in this syntax file
>
>> sub Init {
>>     my ($self) = @_  ;
>>     $self -> AddTagBlock ('h2', ['color'], undef, undef, { perlcode => q{
>>             { $epreq -> component -> curr_esc_mode(0);
>>                 _ep_rp(%$x%, "<h2><img border=0 
>> src=\"/img/h2.gif?color="
>>                 . $epreq -> Escape( %&'color%, 2 )
>>                 . "&text="
>>                 . $epreq -> Escape( 
>> XML::Embperl::DOM::Node::iChildsText(%$n%), 2 )
>>                 . "\"></h2>");
>>             }}
>>         }) ;
>> }
>
> It worked fine in my previous version, but I don't remember what it 
> was - I remember vaguely you sent me  a simple patch for 2.0.x but I 
> can't find it again and apparently it dodn't get to the official 
> version. Thanks for your help
>
> - Robert
>
>
> PS Now it shows this:
>
>   http://www.parkhotel-pruhonice.cz/en/hotel.html
>
> instead of correct
>
>   http://www.parkhotel-pruhonice.germic.cz/en/hotel.html
>
>
>