Update of /cvsroot/po4a/po4a/t
In directory haydn:/tmp/cvs-serv25991/t
Modified Files:
02-TransTractors.t 03-addendums.t 10-discard-fuzzy.t 20-xml.t
21-dia.t
Log Message:
Explicitely call perl <script name> since Module::build is dumb enough for not chmod
+x the content of @scripts
Index: 03-addendums.t
===================================================================
RCS file: /cvsroot/po4a/po4a/t/03-addendums.t,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- 03-addendums.t 7 Nov 2003 15:10:17 -0000 1.3
+++ 03-addendums.t 16 Jul 2004 00:45:41 -0000 1.4
@@ -10,19 +10,19 @@
mkdir "t/tmp" unless -e "t/tmp";
-$tests[0]{'run'} = '../po4a-translate -f man -a data-03/man.addendum1 -m
data-03/man -p data-03/man.po-ok -l tmp/man.fr';
+$tests[0]{'run'} = 'perl ../po4a-translate -f man -a data-03/man.addendum1
-m data-03/man -p data-03/man.po-ok -l tmp/man.fr';
$tests[0]{'test'} = 'diff -u data-03/man.fr.add1 tmp/man.fr';
$tests[0]{'doc'} = 'translate with addendum1';
-$tests[1]{'run'} = '../po4a-translate -f man -a data-03/man.addendum2 -m
data-03/man -p data-03/man.po-ok -l tmp/man.fr';
+$tests[1]{'run'} = 'perl ../po4a-translate -f man -a data-03/man.addendum2
-m data-03/man -p data-03/man.po-ok -l tmp/man.fr';
$tests[1]{'test'} = 'diff -u data-03/man.fr.add2 tmp/man.fr';
$tests[1]{'doc'} = 'translate with addendum2';
-$tests[2]{'run'} = '../po4a-translate -f man -a data-03/man.addendum3 -m
data-03/man -p data-03/man.po-ok -l tmp/man.fr';
+$tests[2]{'run'} = 'perl ../po4a-translate -f man -a data-03/man.addendum3
-m data-03/man -p data-03/man.po-ok -l tmp/man.fr';
$tests[2]{'test'} = 'diff -u data-03/man.fr.add3 tmp/man.fr';
$tests[2]{'doc'} = 'translate with addendum3';
-$tests[3]{'run'} = '../po4a-translate -f man -a data-03/man.addendum4 -m
data-03/man -p data-03/man.po-ok -l tmp/man.fr';
+$tests[3]{'run'} = 'perl ../po4a-translate -f man -a data-03/man.addendum4
-m data-03/man -p data-03/man.po-ok -l tmp/man.fr';
$tests[3]{'test'} = 'diff -u data-03/man.fr.add4 tmp/man.fr';
$tests[3]{'doc'} = 'translate with addendum4';
Index: 10-discard-fuzzy.t
===================================================================
RCS file: /cvsroot/po4a/po4a/t/10-discard-fuzzy.t,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- 10-discard-fuzzy.t 7 Nov 2003 15:10:17 -0000 1.3
+++ 10-discard-fuzzy.t 16 Jul 2004 00:45:41 -0000 1.4
@@ -16,7 +16,7 @@
"-I '^\"POT-Creation-Date: ' -I '^\"Content-Type:' -I
'^\"Content-Transfer-Encoding:'";
my $diff_pod_flags= " -I 'This file was generated by po4a' ";
-$tests[0]{'run'} = "../po4a-translate -f pod -k 0 -m data-10/pod -p
data-10/pod.po -l tmp/pod.fr";
+$tests[0]{'run'} = "perl ../po4a-translate -f pod -k 0 -m data-10/pod -p
data-10/pod.po -l tmp/pod.fr";
$tests[0]{'test'} = "diff -u tmp/pod.fr data-10/pod.fr
$diff_pod_flags";
$tests[0]{'doc'} = "discard the fuzzy translation";
Index: 20-xml.t
===================================================================
RCS file: /cvsroot/po4a/po4a/t/20-xml.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- 20-xml.t 28 Apr 2004 08:41:55 -0000 1.1
+++ 20-xml.t 16 Jul 2004 00:45:41 -0000 1.2
@@ -1,5 +1,5 @@
#! /usr/bin/perl
-# MAN module tester.
+# XML module tester.
#########################
@@ -16,7 +16,7 @@
"-I '^\"POT-Creation-Date: ' -I '^\"Content-Type:' -I
'^\"Content-Transfer-Encoding:'";
my $diff_pod_flags= " -I 'This file was generated by po4a' ";
-$tests[0]{'run'} = "../po4a-gettextize -f sgml -m data-20/text.xml -p
tmp/xml.po";
+$tests[0]{'run'} = "perl ../po4a-gettextize -f sgml -m data-20/text.xml -p
tmp/xml.po >/dev/null";
$tests[0]{'test'} = "diff -u tmp/xml.po data-20/xml.po
$diff_po_flags";
$tests[0]{'doc'} = "gettextize well simple xml documents";
Index: 02-TransTractors.t
===================================================================
RCS file: /cvsroot/po4a/po4a/t/02-TransTractors.t,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -d -r1.6 -r1.7
--- 02-TransTractors.t 29 Nov 2003 18:56:50 -0000 1.6
+++ 02-TransTractors.t 16 Jul 2004 00:45:41 -0000 1.7
@@ -16,19 +16,19 @@
"-I '^\"POT-Creation-Date: ' -I '^\"Content-Type:' -I
'^\"Content-Transfer-Encoding:'";
my $diff_pod_flags= " -I 'This file was generated by po4a' ";
-$tests[0]{'run'} = "../po4a-gettextize -f #format# -m data-02/#format# -p
tmp/po";
+$tests[0]{'run'} = "perl ../po4a-gettextize -f #format# -m data-02/#format#
-p tmp/po";
$tests[0]{'test'} = "diff -u -I POT-Creation-Date data-02/#format#.po-empty
tmp/po";
$tests[0]{'doc'} = "gettextize #format# document with only the
original";
-$tests[1]{'run'} = "../po4a-gettextize -f #format# -m data-02/#format# -l
data-02/#format#.fr -p tmp/po 2>/dev/null";
+$tests[1]{'run'} = "perl ../po4a-gettextize -f #format# -m data-02/#format#
-l data-02/#format#.fr -p tmp/po 2>/dev/null";
$tests[1]{'test'} = "diff -u $diff_po_flags data-02/#format#.po
tmp/po";
$tests[1]{'doc'} = "gettextize #format# page with original and
translation";
-$tests[2]{'run'} = "cp data-02/#format#.po tmp/po &&
../po4a-updatepo -f #format# -m data-02/#format# -p tmp/po >/dev/null 2>&1
";
+$tests[2]{'run'} = "cp data-02/#format#.po tmp/po && perl
../po4a-updatepo -f #format# -m data-02/#format# -p tmp/po >/dev/null 2>&1
";
$tests[2]{'test'} = "diff -u $diff_po_flags data-02/#format#.po
tmp/po";
$tests[2]{'doc'} = "updatepo for #format# document";
-$tests[3]{'run'} = "../po4a-translate -f #format# -m data-02/#format# -p
data-02/#format#.po-ok -l tmp/#format#.fr";
+$tests[3]{'run'} = "perl ../po4a-translate -f #format# -m data-02/#format#
-p data-02/#format#.po-ok -l tmp/#format#.fr";
$tests[3]{'test'} = "diff -u $diff_pod_flags data-02/#format#.fr
tmp/#format#.fr";
$tests[3]{'doc'} = "translate #format# document";
Index: 21-dia.t
===================================================================
RCS file: /cvsroot/po4a/po4a/t/21-dia.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- 21-dia.t 25 May 2004 17:35:54 -0000 1.1
+++ 21-dia.t 16 Jul 2004 00:45:41 -0000 1.2
@@ -13,11 +13,11 @@
my $diff_po_flags = " -I '^# SOME' -I '^# Test' ".
"-I '^\"POT-Creation-Date: ' -I '^\"Content-Type:' -I
'^\"Content-Transfer-Encoding:'";
-$tests[0]{'run'} = '../po4a-gettextize -f dia -m data-21/extract.dia -p
tmp/dia_extract.po';
+$tests[0]{'run'} = 'perl ../po4a-gettextize -f dia -m data-21/extract.dia -p
tmp/dia_extract.po';
$tests[0]{'test'} = "diff -u $diff_po_flags data-21/extract.po-ok
tmp/dia_extract.po";
$tests[0]{'doc'} = 'get only needed strings';
-$tests[1]{'run'} = '../po4a-translate -f dia -m data-21/transl.dia -p
data-21/transl.po -l tmp/transl.dia';
+$tests[1]{'run'} = 'perl ../po4a-translate -f dia -m data-21/transl.dia -p
data-21/transl.po -l tmp/transl.dia';
$tests[1]{'test'} = 'diff -u data-21/transl.dia-ok tmp/transl.dia';
$tests[1]{'doc'} = 'test translations with new-lines';