[Po4a-commits] "po4a changelog, 1.483, 1.484 NEWS, 1.92, 1.93 po4a-gettextize, 1.38, 1.39"

[Nicolas FRANÇOIS]

Update of /cvsroot/po4a/po4a
In directory alioth:/tmp/cvs-serv23751

Modified Files:
	changelog NEWS po4a-gettextize 
Log Message:
	* NEWS, po4a-gettextize: Added options --msgid-bugs-address,
	--copyright-holder, --package-name, --package-version to control
	the generation of the PO header.
	* lib/Locale/Po4a/TransTractor.pm: Pass the PO options to the
	created Locale::Po4a::Po objects.


Index: NEWS
===================================================================
RCS file: /cvsroot/po4a/po4a/NEWS,v
retrieving revision 1.92
retrieving revision 1.93
diff -u -d -r1.92 -r1.93
--- NEWS	20 Jul 2009 17:54:40 -0000	1.92
+++ NEWS	21 Jul 2009 08:39:28 -0000	1.93
@@ -5,6 +5,9 @@
 
 po4apod-display-po
  * New script to display previews of POD translations.
+po4a-gettextize
+ * Added options --msgid-bugs-address, --copyright-holder, --package-name,
+   --package-version to control the generation of the PO header.
 
 Text:
  * Avoid the translation of some markups: title and horizontal rules.

Index: po4a-gettextize
===================================================================
RCS file: /cvsroot/po4a/po4a/po4a-gettextize,v
retrieving revision 1.38
retrieving revision 1.39
diff -u -d -r1.38 -r1.39
--- po4a-gettextize	7 Mar 2009 12:33:10 -0000	1.38
+++ po4a-gettextize	21 Jul 2009 08:39:28 -0000	1.39
@@ -113,6 +113,24 @@
 
 Output some debugging information.
 
+=item --msgid-bugs-address email at address
+
+Set the report address for msgid bugs. By default, the created POT files
+have no Report-Msgid-Bugs-To fields.
+
+=item --copyright-holder string
+
+Set the copyright holder in the POT header. The default value is
+"Free Software Foundation, Inc."
+
+=item --package-name string
+
+Set the package name for the POT header. The default is "PACKAGE".
+
+=item --package-version string
+
+Set the package version for the POT header. The default is "VERSION".
+
 =back
 
 =head1 SEE ALSO
@@ -153,8 +171,16 @@
     exit 0;
 }
 
+my %opts = (
+    "verbose"             => 0,
+    "debug"               => 0,
+    "copyright-holder"    => undef,
+    "msgid-bugs-address"  => undef,
+    "package-name"        => undef,
+    "package-version"     => undef);
+
 my ($pofile)=('-');
-my (@masterfile, at locfile,$help_fmt,$help,$type,$debug,$verbose, at options);
+my (@masterfile, at locfile,$help_fmt,$help,$type, at options);
 my ($mastchar,$locchar);
 Getopt::Long::config('bundling', 'no_getopt_compat', 'no_auto_abbrev');
 GetOptions(
@@ -169,11 +195,16 @@
 	'master-charset|M=s'    => \$mastchar,
 	'localized-charset|L=s' => \$locchar,
 
-	'option|o=s'    => \@options,
+	'option|o=s'            => \@options,
 
-	'verbose|v'     => \$verbose,
-	'debug|d'       => \$debug,
-	'version|V'     => \&show_version
+	'copyright-holder=s'    => \$opts{"copyright-holder"},
+	'msgid-bugs-address=s'  => \$opts{"msgid-bugs-address"},
+	'package-name=s'        => \$opts{"package-name"},
+	'package-version=s'     => \$opts{"package-version"},
+
+	'verbose|v'             => \$opts{"verbose"},
+	'debug|d'               => \$opts{"debug"},
+	'version|V'             => \&show_version
 ) or pod2usage();
 
 # Argument check
@@ -181,15 +212,11 @@
 $help_fmt && Locale::Po4a::Chooser::list(0);
 pod2usage () if (scalar @ARGV > 1) || (scalar @masterfile < 1);
 
-my %options = (
-    "verbose" => $verbose,
-    "debug" => $debug);
-
 foreach (@options) {
     if (m/^([^=]*)=(.*)$/) {
-	$options{$1}="$2";
+	$opts{$1}="$2";
     } else {
-	$options{$_}=1;
+	$opts{$_}=1;
     }
 }
 # Check file existence
@@ -198,8 +225,8 @@
 }
 
 # Declare the TransTractor parsers
-my ($mastertt,$transtt)=(Locale::Po4a::Chooser::new($type,%options),
-			 Locale::Po4a::Chooser::new($type,%options));
+my ($mastertt,$transtt)=(Locale::Po4a::Chooser::new($type,%opts),
+			 Locale::Po4a::Chooser::new($type,%opts));
 
 # Parse master file forcing conversion to utf if it's not in ascii
 foreach my $file (@masterfile) {

Index: changelog
===================================================================
RCS file: /cvsroot/po4a/po4a/changelog,v
retrieving revision 1.483
retrieving revision 1.484
diff -u -d -r1.483 -r1.484
--- changelog	20 Jul 2009 23:18:10 -0000	1.483
+++ changelog	21 Jul 2009 08:39:27 -0000	1.484
@@ -1,3 +1,11 @@
+2009-07-21  Nicolas François  <nicolas.francois at centraliens.net>
+
+	* NEWS, po4a-gettextize: Added options --msgid-bugs-address,
+	--copyright-holder, --package-name, --package-version to control
+	the generation of the PO header.
+	* lib/Locale/Po4a/TransTractor.pm: Pass the PO options to the
+	created Locale::Po4a::Po objects.
+
 2009-07-20  Nicolas François  <nicolas.francois at centraliens.net>
 
 	* scripts/po4apod-display-po: Fix some bashisms.