perl-embperl mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From "Gerald Richter" <rich...@ecos.de>
Subject RE: Urgent: MsgIdExtract problem
Date Tue, 14 Dec 2004 13:46:05 GMT
Did you change the syntax as I proposed:

> '$Embperl::Syntax::MsgIdExtract::Ids{scalar(%#0%)} = q{} if (!exists
> ($Embperl::Syntax::MsgIdExtract::Ids{scalar(%#0%)})) ;',

Try to change 

%#0%

 to 

%#\'0%

?? (Note the additional \' )

Gerald


---------------------------------------------------------------------------
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
---------------------------------------------------------------------------
ECOS BB-5000 Firewall- und IT-Security Appliance: www.bb-5000.info
---------------------------------------------------------------------------
  

> -----Original Message-----
> From: RobertCZ [mailto:robert@robert.cz] 
> Sent: Tuesday, December 14, 2004 1:23 PM
> To: embperl@perl.apache.org
> Cc: Gerald Richter
> Subject: Re: Urgent: MsgIdExtract problem
> 
> Now it does the extracting right (with a lot of quotes ;-)), 
> but it does not seem to show the actual translations in the 
> page itself
> 
> - Robert
> 
> 
> 
> Gerald Richter wrote: 
> 
> 		  when extracting messages. I believe in some 
> older version 
> 		quotes like [= 'Hello World' =] would fix it, 
> but in RC2 it 
> 		just prints it with quotes 'Hello World'.
> 		
> 		The problem is perhaps this definition
> 		
> 		     'Embperl output msg id' => {
> 		        'text' => '[=',
> 		        'end'  => '=]',
> 		        'unescape' => 1,
> 		        'procinfo' => {
> 		            embperl => {
> 		                    perlcode =>
> 		                        [
> 		                        
> 		
> '$Embperl::Syntax::MsgIdExtract::Ids{scalar(%#0%)} = q{} if (!exists
> 		($Embperl::Syntax::MsgIdExtract::Ids{scalar(%#0%)})) ;',
> 		    
> 
> 	
> 	Try to change 
> 	
> 	%#0%
> 	
> 	 to 
> 	
> 	%#\'0%
> 	
> 	Does this help?
> 	  
> 
> 
> 


---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org


Mime
View raw message