[Po4a-commits] "po4a/lib/Locale/Po4a Texinfo.pm,1.11,1.12"

[Nicolas FRANCOIS]

Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory alioth:/tmp/cvs-serv2654/lib/Locale/Po4a

Modified Files:
	Texinfo.pm 
Log Message:
	* lib/Locale/Po4a/Texinfo.pm: Do not import untranslated and
	translate_joined. They do not exist anymore in TeX.pm.
	* lib/Locale/Po4a/Texinfo.pm: Add definition of RE_PRE_COMMENT.
	This fix an infinite loop on gawk.texi.


Index: Texinfo.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Texinfo.pm,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- Texinfo.pm	13 Oct 2007 12:20:32 -0000	1.11
+++ Texinfo.pm	30 Jun 2008 20:27:39 -0000	1.12
@@ -75,14 +75,12 @@
 
 use Locale::Po4a::Common;
 use Locale::Po4a::TeX;
-use subs qw(&untranslated     &translate_joined
+use subs qw(
             &parse_definition_file
             &register_generic_command &is_closed &translate_buffer
             &register_verbatim_environment
             &generic_command
             &in_verbatim);
-*untranslated                  = \&Locale::Po4a::TeX::untranslated;
-*translate_joined              = \&Locale::Po4a::TeX::translate_joined;
 *parse_definition_file         = \&Locale::Po4a::TeX::parse_definition_file;
 *register_generic_command      = \&Locale::Po4a::TeX::register_generic_command;
 *register_verbatim_environment = \&Locale::Po4a::TeX::register_verbatim_environment;
@@ -120,6 +118,7 @@
 $RE_ESCAPE = "\@";
 $RE_VERBATIM = "\@example";
 $RE_COMMENT = "\\\@(?:c|comment)\\b";
+$RE_PRE_COMMENT = "(?<!\@)(?:\@\@)*";
 
 my %break_line = ();