diff options
author | Jonas Smedegaard <dr@jones.dk> | 2010-10-18 16:00:31 +0200 |
---|---|---|
committer | Jonas Smedegaard <dr@jones.dk> | 2011-01-30 18:06:44 +0100 |
commit | 9ea0f29694c4f75b64a51d67d3af11e7baa1ff0e (patch) | |
tree | 961c0ab09daba872320b5e8c437c10769afb6864 /Locale/Po4a | |
parent | 076c4a09664f63e7bf4077c91dc2ffcc0d45d277 (diff) |
Sync with po4a 0.40.1.
Diffstat (limited to 'Locale/Po4a')
-rw-r--r-- | Locale/Po4a/Text.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Locale/Po4a/Text.pm b/Locale/Po4a/Text.pm index 676363d..8f703c8 100644 --- a/Locale/Po4a/Text.pm +++ b/Locale/Po4a/Text.pm @@ -25,11 +25,11 @@ =head1 NAME -Locale::Po4a::Text - Convert text documents from/to PO files +Locale::Po4a::Text - convert text documents from/to PO files =head1 DESCRIPTION -The po4a (po for anything) project goal is to ease translations (and more +The po4a (PO for anything) project goal is to ease translations (and more interestingly, the maintenance of translations) using gettext tools on areas where they were not expected like documentation. @@ -202,7 +202,7 @@ sub parse { my $end_of_paragraph = 0; ($line,$ref)=$self->shiftline(); my $file = $ref; - $file =~ s/:[0-9]+$//; + $file =~ s/:[0-9]+$// if defined($line); while (defined($line)) { $ref =~ m/^(.*):[0-9]+$/; if ($1 ne $file) { |