[Po4a-commits] "po4a/lib/Locale/Po4a TransTractor.pm,1.105,1.106"
Nicolas FRANÃOIS
nekral-guest at alioth.debian.org
Tue Jul 21 13:29:46 UTC 2009
Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory alioth:/tmp/cvs-serv2954/lib/Locale/Po4a
Modified Files:
TransTractor.pm
Log Message:
* lib/Locale/Po4a/TransTractor.pm: Pass the PO options to the
created Locale::Po4a::Po objects.
Index: TransTractor.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/TransTractor.pm,v
retrieving revision 1.105
retrieving revision 1.106
diff -u -d -r1.105 -r1.106
--- TransTractor.pm 5 Apr 2009 12:01:19 -0000 1.105
+++ TransTractor.pm 21 Jul 2009 13:29:42 -0000 1.106
@@ -343,10 +343,14 @@
## Create our private data
my %po_options;
$po_options{'porefs'} = $self->{options}{'porefs'};
+ $po_options{'copyright-holder'} = $options{'copyright-holder'};
+ $po_options{'msgid-bugs-address'} = $options{'msgid-bugs-address'};
+ $po_options{'package-name'} = $options{'package-name'};
+ $po_options{'package-version'} = $options{'package-version'};
# private data
$self->{TT}=();
- $self->{TT}{po_in}=Locale::Po4a::Po->new();
+ $self->{TT}{po_in}=Locale::Po4a::Po->new(\%po_options);
$self->{TT}{po_out}=Locale::Po4a::Po->new(\%po_options);
# Warning, this is an array of array:
# The document is splited on lines, and for each
More information about the Po4a-commits
mailing list