[Po4a-commits] po4a/lib/Locale/Po4a TransTractor.pm,1.54,1.55
Martin Quinson
po4a-devel@lists.alioth.debian.org
Sat, 22 Jan 2005 23:32:27 +0000
Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory haydn:/tmp/cvs-serv3775/lib/Locale/Po4a
Modified Files:
TransTractor.pm
Log Message:
Shame on me, not able of writing a my statement
Index: TransTractor.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/TransTractor.pm,v
retrieving revision 1.54
retrieving revision 1.55
diff -u -d -r1.54 -r1.55
--- TransTractor.pm 20 Jan 2005 09:42:05 -0000 1.54
+++ TransTractor.pm 22 Jan 2005 23:32:24 -0000 1.55
@@ -119,8 +119,8 @@
sub parse {
PARAGRAPH: while (1) {
- $my ($paragraph,$pararef,$line,$lref)=("","","","");
- $my $first=1;
+ my ($paragraph,$pararef,$line,$lref)=("","","","");
+ my $first=1;
while (($line,$lref)=$document->shiftline() && defined($line)) {
if ($line =~ m/<p>/ && !$first--; ) {
# Not the first time we see <p>.