[Po4a-commits] "po4a/lib/Locale/Po4a BibTeX.pm,1.1,1.2"

[Nicolas FRANCOIS]

Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory haydn:/tmp/cvs-serv24411/lib/Locale/Po4a

Modified Files:
	BibTeX.pm 
Log Message:
Fix the first BibTeX bug.


Index: BibTeX.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/BibTeX.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- BibTeX.pm	29 Aug 2006 21:22:10 -0000	1.1
+++ BibTeX.pm	29 Aug 2006 21:27:30 -0000	1.2
@@ -79,7 +79,7 @@
             $self->pushline( $line."\n" );
         } elsif (    $id ne ""
                  and $field eq ""
-                 and $line =~ m/^((.*?)\s*=\s*)([^{]*?)(\s*,?\s*)$/) {
+                 and $line =~ m/^((.*?)\s*=\s*)([^ "{].*?)(\s*,?\s*)$/) {
             my $end=(defined $4)?$4:"";
             $self->pushline( $1.$self->translate($3,
                                                  $self->{ref},