[Po4a-devel][CVS] po4a/t 02-TransTractors.t,1.6,1.7 03-addendums.t,1.3,1.4 10-discard-fuzzy.t,1.3,1.4 20-xml.t,1.1,1.2 21-dia.t,1.1,1.2

Martin Quinson po4a-devel@lists.alioth.debian.org
Fri, 16 Jul 2004 00:45:43 +0000


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';