Update of /cvsroot/po4a/po4a
In directory haydn:/tmp/cvs-serv26535
Modified Files:
po4a-gettextize po4a-normalize po4a-translate po4a-updatepo
Log Message:
Make sure --version works
Index: po4a-normalize
===================================================================
RCS file: /cvsroot/po4a/po4a/po4a-normalize,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -d -r1.14 -r1.15
--- po4a-normalize 30 Apr 2004 23:05:43 -0000 1.14
+++ po4a-normalize 25 May 2004 19:19:32 -0000 1.15
@@ -84,11 +84,8 @@
use strict;
use warnings;
-use Locale::Po4a::KernelHelp;
-use Locale::Po4a::Man;
-use Locale::Po4a::Pod;
-use Locale::Po4a::Sgml;
use Locale::Po4a::Chooser;
+use Locale::Po4a::TransTractor;
use Getopt::Long qw(GetOptions);
@@ -109,6 +106,7 @@
"conditions. There is NO warranty; not even for\n".
"MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE."
),"po4a-normalize",$VERSION)."\n";
+ exit 0;
}
my ($help_fmt,$help,$type,$debug,$verbose,@options);
Index: po4a-translate
===================================================================
RCS file: /cvsroot/po4a/po4a/po4a-translate,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -d -r1.20 -r1.21
--- po4a-translate 30 Apr 2004 23:26:36 -0000 1.20
+++ po4a-translate 25 May 2004 19:19:32 -0000 1.21
@@ -147,6 +147,7 @@
use warnings;
use Locale::Po4a::Chooser;
+use Locale::Po4a::TransTractor;
use Pod::Usage qw(pod2usage);
use Getopt::Long qw(GetOptions);
@@ -166,6 +167,7 @@
"conditions. There is NO warranty; not even for\n".
"MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE."
),"po4a-translate",$VERSION)."\n";
+ exit 0;
}
Index: po4a-updatepo
===================================================================
RCS file: /cvsroot/po4a/po4a/po4a-updatepo,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -d -r1.19 -r1.20
--- po4a-updatepo 30 Apr 2004 23:05:43 -0000 1.19
+++ po4a-updatepo 25 May 2004 19:19:32 -0000 1.20
@@ -111,6 +111,7 @@
use Locale::Po4a::Po;
use Locale::Po4a::Chooser;
+use Locale::Po4a::TransTractor;
use Pod::Usage qw(pod2usage);
@@ -131,6 +132,7 @@
"conditions. There is NO warranty; not even for\n".
"MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE."
),"po4a-updatepo",$VERSION)."\n";
+ exit 0;
}
Index: po4a-gettextize
===================================================================
RCS file: /cvsroot/po4a/po4a/po4a-gettextize,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -d -r1.19 -r1.20
--- po4a-gettextize 30 Apr 2004 23:05:43 -0000 1.19
+++ po4a-gettextize 25 May 2004 19:19:32 -0000 1.20
@@ -131,6 +131,7 @@
use Getopt::Long qw(GetOptions);
use Locale::Po4a::Chooser;
+use Locale::Po4a::TransTractor;
use Pod::Usage qw(pod2usage);
@@ -150,6 +151,7 @@
"conditions. There is NO warranty; not even for\n".
"MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE."
), "po4a-gettextize", $VERSION)."\n";
+ exit 0;
}
my ($pofile)=('-');